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vóór U ligt, geachte knutselaars, het eerste 
nummer ín 1983 van het intusser befaamde bled 
ACORN NIEU U ziet, dat wij het jaar begon- 
pen zijn met alvast een kwellend probleem op te 
lossen. Wij bedcelen het prcbleem met de eikel 
tjes. Vele leden schreven ons hoe dat nu 
moest met eikeltjes bij het 1Cûe nummer van 
Accrn Nieuws. hebben dit verrassend goed 
lost, dachten wij Al lt niet te ontkennen 
het probleem eigenlijk elleen maar voor 
geschoven hebben. Onvermijdelijk 
nú al de v g 
die eikeltjes bij 
Terecht urlijk. En 
doorgaan elk jaar het for- 
s te halvere Wij hepen ech- 
inventiviteit Acorn — 
kunen verschij in een bub tjes 
n die tijd, Wij houden de moed 
en voor 1883 ons motto 
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SAMEN WIJZER 








BESTUURS MEDEDELINGEN 








De ommezwaai van één enkele landelijke Club naar een 
FEDERATIE van (momenteel) 13 4 zelfstan- 
dige ACORN COMPUTERCLUB's in Nederland en Belgie is 
voor elkaar. Om versnippering tegen te gaan en alle 
voordelen van een grote Club te behouden, zijn al deze 
Club's onderling gekoppeld în een FEDERATIE. 


Ieder van U persoonlijk fs nu lid van Uw regionale of 
plaatselijke ACORN COMPUTERCLUB. Uw Club is lid van 

de Federatie, In principe betaalt U Uw contributie 

aan Uw eigen Club, De Federatie zorgt alleen voor de 
inning. Verdere taken van de Federatie zijns het doen 
samenstellen van ACORN NIEUWS en de verzending, het in- 
richten van een Centraal Aanmeldingsadres voor nieuwe 
leden en het Cöordineren van de diverse NETWERKEN, 


Van Uw f50.- contributie mag de Federatie f 55. 
besteden voor genoemde taken. f15.- gaat omgaand re 
tour naar de betreffende penningmeesters. 


Ieder lid uit 1982 ontvangt deze ACORN=NIEUWS '83 nr 1 
Oók degenen, die voor 1983 nog niet betaald hebben. De 
betaling kan alleen per ACCEPTGIROKAART, die U van UW 
penningmeester krijgt toegezonden. 


Heeft U nog niet betaald, doe dit dan wel, anders zit 
U ernaast bij de volgende nummers van Acorn Nieuws, 
Heeft U nog geen acceptgirokaart ontvangen, bericht dit 
dan aan UW penningmeester 4 4 


Op„bladzijde2 treft U een lijst aan van alle momenteel 
bekende BESTUURSFUNCTIES,. Deze mefsen vormen de eerst- 
volgende Algemene Vergadering ven de Federatie in Maart 
a.s, Zij vertegenwoordigen U naar evenredigheid van de 
grootte van Uw Club en maken in feite verder de dienst uit, 


Behalve deze Bestuursfuncties hebben vele CLUB's ook nog 
aparte mensen voor Hardware, Software, Redactie, Bandjes, 
Programmeren, etc, Een lijst hiervan is in de maak. 


Wij vertrouwen erop, dat wij nu tesamen een VERENIGING heb 
ben gevormd met een zeer gezonde structuur. Het ledental 
blijft intussen gewoon stijgen, Daar kunnen we nu wel tegen. 


> OP NAAR DE DUIZEND IN 1983 ? 
Borghaerts 


ACORN ELUB : 


LIMBURG 


ROTTERDAM & 0 


Delft & 0 


DEN HAAG & 0 


Venlo/Nijmegen 


CENTRUM 


Belgie 


OVERIJSSEL/GELD. 


TWENTHE 


NOORD (Gr Fr Or) 


Zeeland 


BRABANT OOST 


ARNHEM /Achtar- 
hoek 


Voorzitter 7 


B, Haasen 
Amstenraderweg 12 
64478T Merkelbeek 
04492-35216 


Ge Akkermans 
de Pintostraat 66 
3052NP Rotterdam 
030=182253 


A. Bliek 
Noordeinde 43 
2611KG Delft 
015-142663 


R‚ van Veen 

Dr. Kruytstr 75 
2283KB Rijswijk 
070-3945196 


G.Borghaerts 
Hatertseweg 3 


„6581KD Malden 


0580-581356 


F Appelman 
Kastanjelaan 2 
4131AV Vianen 
03473-16681 


Jeliijngheer 
Fr.Verdonckstraat 39/8 
B1140 Brussel 
09322-2160404 


J.Ballijns 
Anterisstraat 12 
8303A3 Emmeloord 
05270-14430 


Ge Morsink 
Rijsaansestr 2 
7442MG Nijverdal 
05406-15475 


F. de Vries 
Scheldestraat 65 
9406PG Assen 
05920-50880 


C. van Driel 
Walcherseweg 220 
4334NB Middelburg 
01180 37246 


T. Verschuren 
Hosingenhof 30 
S625NL Eindhoven 
040-416092 


EC. Uges 

Witts de withstr.78 
6712HE Eda 
08380-12756 


Secretaris : 


EeSanders 
Korvererf 1 
60435L Roermond 
04750-26051 


Jev. Nieuwenhuyzen 
Brijhoekstr 32 

3223BE Hellev.sluis 
01883-15129 


Me Schröder 
Vlamingstraat 42 
2611KX Delft 
0015-143772 


N.Claveaux 
Noorderbeekstr 74 
2562PE den Kaag 
070-6590056 


R. Heuvel 
Sriaìmontstr. 
S813HJ Venlo 
07740160 


A. Veerman 
Adelaarstraat 11 
3514CA Utrecht 
9030-717457 


16 


Ge Wisser 
Haringvliet 391 


8032-Ht Zwolle 
$46561 / 


J, Laarman 
Potgieterstraat 13A 
7442XP Nijverdal 
05486-17178 


We Spaans 
Orchidee str. 148 
9731GM Groningen 
050-4148035 


He Heringa 





Penningmeester + 
ledsnadministratie 


WeEenst 
Cypresstraat 94 
6101X Echt 
04754-56535 


Re de Haan 
Electrostraat 7 
2983GH Ridderkerk 
0180417263 


P‚Kramer 
Oudraedweg 36 
26125N Dalft 
015-1413686 


R. Tiel 
Vredeoard 96 
2544T2 den Haag 
020-294170 


Ae Brussen 
veHeemstraueg 72 
6645KJ Winesen 
08872-23972 


Ph. v. Mourik 
Ruiterstede 60 
3431XN Nieuwegein 
13402-40781 


6, Noorland 
Pr.lreneweg 4 
7433DE Schalkhaar 
05700-25294 


W. Verhoeven 
Witbreuksweg 385/306 
7522ZA Enschede 
053-8093674 


Je de Goede 
Hunze 26 
9406EE Assen 
0592050675 


Bosseweide J2 
4431AE sGravenpolder 


01103-24357 


J, Glasbergen 
Plataanstraat 3 
S671AL Nuenen 
040-8325772 


H. Strumphler 
Kortenaerlaan à 
68B1IET velp 
085-5647404 


Je. Wijnen 
Dicambioweg 12 
S624CK Eindhoven 
040-443841 

Je. Hartog 
Keyenbergseweg 4 
6B71UK Renkum 
08373-35757 


OVERZICHT FEDERATIEVE FUNCTIES vanaf 1 januart 1985 


NEN enntnd 
+ Voorzitter £ G. Borghaerts, Hatertseweg 3 6581 KD Malden, 
+ Secretaris/Penningmeester : M,Y.C.Gruyters, zelfde adres. 
$+ tedenadministratie : G. Visser, Haringvliet 391 Zwolle, 


+ Redacteur Acorn Nieuws 4 Ke Otten, JA, de Gravenlaan 17 
2381 TA Zoeterwoude 01715 — 1929 


+ Drukwerkarchief : F., Benschop, de Blauwe Wereld 49 1398EP 
Muiden. Tfn 19,00-20,00 u. D2942 -3605 


+ Listing Archief : E. Sanders, Korvererf 1 6043SL Roermond 
04750-26054 f0,15 per dubbelcopie+porto 


+ Data ah. : G. Akkermans, de Pintostraat 66 3052NP R'dam. 
+ Print lay-cut service : P.van Ofemen, v Speykstr 12 Lisse 


+ Bandjes-Archief: Acorn Club bandjes: N.Stad,Plataanweg 47 
1544PB Zaandijk Tfn 075 — 280808. 


+ Bandjes-Archief: Ruilbeursbandjes : wWeErnst,Cyprasstr. 94 
61019X Echt Tfn 04754 — 5653, 


+ Eprom-dienst + B. Kak, de Geerkamp 14-27 6545HK Nijmegen. 


Ht tt + 
OM BIJ HET STEEDS TOENEMENDE LEDENTAL NIET OVERBELAST TE 
WORDEN, VERLENEN VOORNOEMDE PERSONEN IN HET ALGEMEEN HUN 
DIENSTEN NIET AAN INDIVIDUELE LEDEN, MAAR ZOVEEL MOGELIJK 
BINNEN DE ZGN. "NETWERKEN! VAN OVEREENKOMSTIGE FUNCTIES 
VAN DE (REGIONALE) ACORN CLUB's. GRAAG UW MEDEWERKING £ 


EEEN EKAIN ARRA 
Wanneer wij een prijs te vergeven hadden voor de origineelste 


BLADNAAM, dan zouden wij voorstellen, die naar Brabant te 
sturen : 





Gn DE CURSOR I 


“BRABANT-OOST” 
Eerste jaargang Hamer 3 


Redaktie: Plataanstraat 3, 5671 AL Nuenen. Telefoon 040 - 832572. 





OPRICHT INGSVERGADERING 

1 j.l: beeft io Eindhoven de oprichtingebijeenkoust plaatsgevonden van 
de regi fdaling Brebent-Ooet. Zen twintigtal leden vaa op de uitnodiging van 
initiatiefaemer Tiey Yerschuren zeur het buurtcentrum "*t Rool” gekomen. Annverig 
vas cok 4e beer Gererd Borgheerts, de oprichter van de Acorn Computer Club. 

Tiny leidóe het eerste deel van de vergader! arin enkele ragiementeire zaken 
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Blz 


3ìz 





DIT NUPER 








Laar gaan we weer : 


2 BESTUURSMEEEDELING, Yitgaande van het Organisatie-advies ir 
kcorn Nieuws \r. 8 '82 en van de Vergedering van coördinatoren 
op 18 dec.'82 werd de Club omgeturnd tot een greed gestructu- 
reerd geheel, Leest U goed hoe het gaat met de centjes } 


3 Nemen en adressen van ce BESTUURSLEDEN van de momenteel 1% 
bij de FEDERATIE aarsestoten Acern Computerclubs. 


GERHARD VISSER (omlijnd) stelt zich beschikbaar voor de opvang 
nieuwe ede, doorverwijzing raar de betreffende ACORN CLUB en 
in het algemeen voor coördinatie van de REGIONALE INDELTAGEN, 


4 Verdere FEOERAT_EVE (landelijke) furcties en gegevens. 


En ale U dit alles goed gelezen heeft, gaan we nu weer beginnen cver 
computers en Zo 2 H 


Blz 


Blz 


Slz 


Blz 


227 A 


T-1á Jaques Mijngheer, opperhoofd kij orze Belgische vrienden, 
vertelt weternswaerdigheden cver ORTA — BASE progremma's 


15-17 Hans Schoon construserde een -in Fet audiugebied smalban- 
diger- MORSE — INTERFACE. De moeite van proberen waard 3 


18-22 Voortzetting van de ASSEMBLEREURSUS door Leendert 
Bijnagte. Je behandelde stof, adresseren, is voer beginners 
wat ongemakkelijk, waar probeer U daar toch doorheen te slaan, 
Wij willen met die cursus veel Ì = den meetrekken in 
het gebruiken van alle ATOM-megelijkheden, Stuurt U ons een 
kaartje als het te vlug gaat of ergens niet duidelijk genoeg 








2 22 LANGERE REGELS CP CE ACORN ATOM uit Your Computer dec. 'B2, 


23-2á PTR POINTER OF RANOCM FILE, Hans Admiraal snuffelt 


rond in ATOM — KOM's en in ZERO — PAGE en doet suggesties 
voor het gebruik van niet algemeen bekende routines, 


25 Lit de heed van Frans van Hoesel, een TRUC met de EASIC- 
INTERPRETOR. Met GOTC uit een FOR-NEXTloup springen ® 
Aardacht voor ZERO-PAGF HEX 20 en 21, 


26 Van Jan Lernout werd de computerkast Le klein, Komt méér 
voor ze kurt de kaárten dan naer een RACK verhuizen, of, 
wat. Jan deed, de KAST VERHOGEN. Met cerstrectietekening. 












SEREN als herdware-begr Via 1£ adreslijnen en adres 


decoders raar- dat éne adres in die Éne CHIP, 





; 28 HORESSEREN als software begrip. Samenvatting in andere woor- 


den, Misschien is er iemand mee gebact. 


39 BINAIR-DECIMAAL SONVERSIE uv: . Als U ru Uw sommetjes mezkt 
kunt U ze doer de Aten: laten controleren, Hans van der Lint 
levert hiervoor het programms, 





De SCHAKELKAART Meerdere groepen proyremmeurs bekijken de 
aogelijkhesten. We glaren even om zer hoekje. Zie aock viz,32 


32 PRINTE 





RVICE, Wordt veek over gebeld, bie doen ons best 





RE, De CGS-CeheugenIt's koper we voorlopig liever niet 
meer 'en gros! in. Is aas bij de calerde prijzen te riskant 1 





Blz 


Blz 


Il 


Blz 


le 
Blz 


Blz 


Blz 


Elz 


Elz 
812 
Blz 


Blz 


Blz 


Oit 


33 Het OIRLST INGYPEN VAN GRAFIC s ten slimme menier van 
Frank de srcot, Het ís maar een weet, 


34-56 TV — VIDEO OMEOUW Oliek Protzman, onze professionele 
Tv man vertelt goed gedocumenteerd e‚e‚a, over het verbe 
teren van het TV beeld. En vergeet niet eerst naar de 
ATOM te kijken als mogelijke bron van storing. 


37-38 Aan ANALOOC-DIGITAAL CONVERTERS hebben we Zn de Club 
tot dusverre gean bliksem gedaan. Brcodnodig vcor het be- 
sturen van Uw Spece Shutle met een analoog pookje b.v. En 
om wal behoerlijker te tekenen enz. Leendert Bijnagte doet 
daar wat aan, En zo te zien niet duur. Ovsrigens: het 
zelf maken van zen analoog pookje (mudelviiegers !) ís 
pok niet zo'n heksentoer. Bij Vogelzang in Heerlen zag ik 
ze van MARANTZ (ret schuifpatjes) tegen dumf-prijs. 


39 Uit ELEKTUUR febr. 83 een samenvatting van de pin layouts 
van 2k tot Bk EPROF's, Makkelik zo'n samenvatting. Let 
overigens op de voeding van een TEXAS 2716. Niet kopen. 
Etektuur komt trouwens în het Maart-nummer uit met eer 
16 tot 6ák CMOS EPRUM-RAM kaart met battery backuo. 


40 Twede aflevering van de pregrammeertaal "PILOT" dour 
Gerard Akkermans. Gerard zit in de exementijd, vardaar op: 


41-42 een korte aflevering van de cursus PFOKTFT … 


43-45 Een BOCTS TRAF is de routine die onze mactine na aan- 
zetten bedrijfsklaar maakt t/n het printen van'ACORN ATOM. 
Frans van Hoesel cnderbreekt die routine ergens om hem 
voor zijn eigen karresje te kunnen spannen. El eer: BREAK 
doet de Atom dan „utcmatisch óók iets, wat Frans hem extra 
of anders wil lsten oen. B.V, de TEXTSPACE POINTER naar 
eer. andere plaats }!} Graag Uw reacties na uitprokeren & 


46-43: ITERATIE vlg NEWTCN (Nulpuntbepaling van een curvz) 
Een hapklare wiskundabrok van Henk Eoxma, wiskundecocent. 
Lekkernij denk ik voor de vele wisk studenter in onze club 4 


49 vit Your Computer: SHUT Manipuleren met de cursor. 


50 Yan Hars van der Lint r. LUIDSPREKERVERSTERKZERTJE, Maakt 
de Xoon-Lander bij crashen nóg meer herry. Zelfs in het 
luchtledige, (Een Fysische merkwaardigteid van mconlanders} 


51 Van dezelfde euteur: JMECUW AECRHSFT "SNAPEER" 4, joy-stick. 





52 Het ir. 't hoge geheugen FLAATSEN VAN DATA docr Ton Utten 
53 Advies aan INZENDERS van COPY door Ton Otten, 


5A=65 PEER ZERO-PAGE 227 Overgeromen vit 'SURST!, uit jave ven 
de Roosendaalse Comp.Cluo. Corsprong: Clektronik. 


56-58 Vier Op Een Rij door Gerard Akkermans. Het overeenkomstige 
Acornsoft FOUR ROW is goed te verslaan. Van Gerard niet £ £ 


59 ALLCOS van Arie Marchel. Opnieuw wegens misdruk \orig nr. 


60-64 De EPROM-PROGRAMMER Werkstuk van Fiet van Diemen t 
Voor de ras-doe het zelvers 5 Oók te bestellen. Zie 812,52 


nummer werd geredigeerd docr Merion Gruyters, Ton Ctten, G.Eorghaerts. 


Gedrukt doer RACMO Regionaal Administratief Centrúm te MEPPEL, 


DATABASE 





INLEIDING 


Oorspronkelijk was het niet de bedoeling verder te gaan 
dan enkele ervaringen met de database van Acornsoft. 


gatagest “Sn Se 


Naderhand leek het nochtans interessant wat algemeenhe- 
den te geven omtrent commerciële databaseprogramma's, 

Men spreekt erover, men schrijft erover, en de basisprin- 
cîpes zijn toch grotendeels gelijklopend aan de database 
voor hobbydoeleinden. 


Databaseprogramma's in het algemeen. 


LADE SES, 





Een database betekent "gegevensbestand"-programra, d.w.z. 
een programma dat de verwerking toelaat van een groot aan- 
tal gegevens. Het is dus in feite een programma dat het 
mogelijk maakt te zoeken en te sorteren în een groot ge 





gevensbestand, Op commercieel vlak zijn dergelijke gege- 
vensbestanden meestal opgeslagen on disk of diskette, soms 
ook op band. 

Al naargelang de manier van zoeken en sorteren, met behulp 
van het databaseprogramma, in zo'n gegevensbestand onder- 
scheidt men twee soorten : 

enerzijds de sequentiële gegevensbestanden anderzijds de 
directe gegevensbestanden. De sequentiële gegevensbestan- 
den zijn record na record opgemaakt en beschreven. Een 
record is gelijk aan een volledige set van informatie bin- - 
nen een bestand bv. persoonsnaam, adres, postcode. "Sequen- 
tieel" betekent dat men in zo'n gegevensbestand record na 
record moet aflopen om daarin te zoeken en te gaan sorteren. 
Om bv. het 10de rrecord” te lezen moet je eerst de 9 voor- 
gaande doorlopen hebben. Wil je daarna de 9de "record" le- 
zen dan moet je opnieuw vanaf de Iste “record” beginnen. 
Sequentiële bestanden zijn de enig mogelijke bij cassette- 
opslag. Met een diskettesysteem bestaat er ook de mogelijk- 
heid van "directe toegang" tot een bestand. Dit zijn dan 
de “directe” gegevensbestanden. Je kan dan bv, direct naar 
het 10de "record" en na uitlezen, ook direct naar "record" 
nr.9. 


2.1. Sequentiele bestanden. 


Sequentiële bestanden worden gebruikt voor informatie 
die niet veel verandert bv. naam, adres, woonplaats- 
bestanden. De meeste sequentiële bestanden kunnen 
niet uitgebreid worden, of groter gemaakt worden, wat 
hun structuur betreft. 


Omdat men ín zo'n gegevensbestand moet werken, zoeken 
en sorteren vergt de opbouw ervan een logische struc- 
tuur. Men past dan ook daarbij principes toe uit de 
verzamelleer, netwerkmodellen, enz... Het grote pro- 
bleem bij het verwerken van aanzienlijke hoeveelheden 
gegevens die op een bepaalde manier moeten worden 
gestructureerd en georganiseerd is dat van “massa” en 
van “complexiteit”. 


2.2. Toepassingen. 


Toepassingsmogelijkheden vindt men in bedrijf s- en ver- 
enigingsadministratie, management, onderwijs. 
Databaseprogramma's worden gebruikt in boekhouding, voor 
ledenlijsten, voor inventarislijsten, numerieke en statis- 
tische gegevensverwerking, maíilinglisting enz... 

In de literatuur worden soms bijzondere databases afge- 
kort als volgt : 


DBMS = DATABASE MANAGEMENT SYSTEM 


DSS DECISION SUPPORT SYSTEM 
DD/DS= DATA DECTIONARY/DIRECTORY SYSTEM 


Vereisten zijn : - een verantwoorde aanpak ; 
= een aanvaardbaar kostenniveau . 


Daarenboven komen op commercieel vlak meestal ook "bevei- 
ligingefbij te pas : daarom worden in databases ook pas- 
woorden gebruikt. 


Het komt er inderdaad op aan de juiste informatie te geven, 


op het juiste moment, en aan de juiste gebruiker, 


2.3, Hoe is een gegevensbestand opgebouwd % 





Een bestandsstructuur omvat een aantal files, records, 
fields, delimiters en een EOF, 
Wat betekent dit allemaal ? 
een file = een bestand = een groep van collettieve gegevens, 
opgeslagen op disk/diskette/tape of in het werk- 
geheugen van de computer. 
een record = complete set van informatie binnen een bestand 
een field = veld = een stukje informatie binnen een re- 
cord (bv. de postcode) 
een delimiter = afscheiding = een "karakter" (bv. het dub- 
belpunt) dat de scheiding tussen twee 
fields vormt. 
EOF = End of Pile = einde bestand bv. 10.000 } Dit geeft 
aan dat het databaseprogramma niet verder 
hoeft te zoeken in het bestand. 


De volledige adressenlijst van al onze leden vormt ons 
“ledenbestand”, 


2,8, Een voorbeeld ? 


Alle gegevens omtrent &én lid zijn samengebracht in een 
“record”. Zo'n record omvat verschillende fields zoals 


NAAM + VOORLETTERS ; STRAAT + HUISNUMMER ; POSTCODE + WOON- 


5 
PLAATS : TEL. NR. In dit geval is de delimiter een dubbel- 
punt. 


3, Het programma "Database" van Acornsoft, 


"Database" van Acornsoft is een bescheiden databaseprogramma 
voor. de Acorn-Atom, geleverd op cassette. 

Dit programma, dat universeel is opgebouwd, laat dus toe in 
een gegevensbestand te werken. Voor alle duidelijkheid zul- 
len wij in het vervolg zo'n gegevensbestand aangegeven als 
“data-list". 

Het databaseprogramma wordt geladen op # 2.900 en omvat{} + 1}K 
m6 blokken, tot} 38 EF, endaarenboven ook een 
sorteerprogramma in assembler op 2.800. 


Het te verwerken gegevensbestand, de zgn. “data-list",‚wordt 
ingebracht op $& 8.200, dus in het interne geheugen zelf en 
niet op een extern geheugen (disk of cassette zoals dit met 
commerciële databases gebeurt). 

Dit laat meteen toe met grote snelheid te werken. 

Op de cassette van Acornsoft staat ook een voorbeeld van een 
gegevensbestand getiteld "WINE LIST", 

Het geeft de samenstelling van een wijnkelder. 


5.1. Hoe is zo'n “datalist" opgebouwd 7 


Met bv. 6 K geheugenruimte kunnen È 100 "records" in Eén 


keer behandeld worden. Een record ís, zoals wij hier- 
voren al gedefinieerd hebben, een"infoset tof misschien 
nog duidelijker gezegd een "fiche". Elke fiche bevat 

een aantal elementen (zfields), en deze fields zijn steeds 
gescheiden door een dubbelpunt, dit is de delimiter. 

Het gehele bestand is gedefinieerd door een "Header", 

(= Hoofding). Zo'n "Header" omvat de verschillende 
benamingen van de"fields" met (tussen haakjes) hun 
maximum lengte. 


Elke "field" ís gescheiden door een komma of een return 





+ line number. 


Kleine fields worden best gegroepeerd met codeletters 

of cijfers. Bij onbeperkte lengte van een field ge- 

bruikt men - 1. Zo'n field komt dan achteraan, in 

principe op een afzonderlijke regel, afgescheiden met 

een stippellijn, en kan meer dan één regel lang zijn. 

Zo'n Hatalist” is opgebouwd als een gewoon BASIC-pro- 
gramma, vandaar de naam "list", met regelnummers. Deze regel 
vormt een extra field, waarvan de breedte vastligt op 

bh karakters. 

Op het einde van de datalist komt dan de terminator (eindpunt ) 
bv. 10,600 


Het werken met "DATABASE" 





Nadat men het databaseprogramma heeft ingeladen op dE 2.900 
en een datalist heeft ingebracht op $#8.200 kan men het 
programma in # 2,900 runnen. Bij “run” krijgt men na 
enkele ogenblikken een prompt : 2 
Op dat ogenblik zijn er 14 "commands" 
Alt - Go - Run - Test - Edit - Print - Reset - Unsort - End 
Pron - Set - Fields - Proff — Alt 
1. Fields : geeft een eerste check-up van de fieldname de- 
finition, 
Opmerking : fields zijn slechts uit te printen op prin- 
ter na eerst print $ 2 gegeven te hebben. 
2, Om dan verder te zoeken in de datalist zijn minstens 
drie opeenvolgende commands te geven namelijk, SET, 
PRINT en GO. 


SET — zegt het programma waarnaar dient gekeken te 
worden in de datalist. 
PRINT — geeft aan welke fields geprint moeten worden 
op het scherm 
GO - geeft de start van “search” aan, d.w.z. "zoeken" 


- SET ALL d.w.z. kijk naaralle records 
van de datalist 

— PRINT ALL d.w.z. geef heel de datalist 
op het scherm 





= GO geeft de start aan. 





9 pij SET kan men ook aangeven bv. 

SET AARD = B d.w.z. dat alleen gekeken 
wordt naar die aanduidin- 
gen met "B" onder de field 
Aard" (B is dan bv = boeken) 

© bij PRINT kan men zich bv. beperken tot 

LINE NUMBER (= regelnummer) 

© tenslotte kan men ook zeggen SET AARD = B 
AND ..… 
OR …. 

dus ook nog een andere beperking invoeren. 
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12 


3. 


5. 


s SET AARD = T and TITEL sub 
Elektronica hetgeen dan al- 
leen de tijdschriften (T) zou 
geven met de titel “Elektro- 
nica” uit de datalíst. 





Tussen de commando's PRINT en GO kan men nog andere 
inlassen bv. SORT. Op dat ogenblik krijgt men een 
alfabetisch gesorteerde uitprinting van het gevraagde 
gedeelte. De data-líst zelf blijft uiteraard onver- 
anderd. De sortering met de database van Acorn-soft 
gebeurt volgens het "SHELL SORT" systeem en sorteert 


volledig zo'n 90 records in È 18 seconden. Het 

zou ons híer te ver leiden dieper te moeten ingaan 
op dit sorteersysteem. Misschien ís dat een interes- 
sant onderwerp voor een volgend artikel. 

Wenst men verder geen sorteren meer van opgevraagde 
elementen dan geeft men het commando : "UNSORT", 


Men kan ook het commando "PRON" toevoegen. Het inlassen 
van PRON dient voor het uitprinten op printer, PRON D 
geeft grote letterkarakters op de printer. PRON C 

geeft de (-1)-fields op eenzelfde regel als de andere 
gegevens op de printer en dus niet op een afzonderlijke 
regel zoals hierboven vermeld. Ook hier kan men 
naderhand dit commando uitschakelen met het commando 
PROFP. 


Wil men wijzigingen of aanvullingen aanbrengen aan de 
data-list dan gebruikt men EDIT. Dit gaat net zoals 
elke andere wijziging of aanvulling van een BASIC-pro- 
gramma. Na een Editing komt men terug met RUN en een 
RESET. RESET zet alle arrays (reeksen variabelen) weer 
goed. Op te merken is hierbij dat er aanbevolen wordt 
op de eerste regel van het gegevensbestand, dus van de 
data-list, telkens te vermelden 

2 18 = 29 ; ar 

Deze lijn Îs dus een terugkeer naar "Database" na een 
Editing. 


6. Men kan ook het runnen stoppen met END. (beter dan ESCAPE) 


7. Blijft dan nog het commando ALT. Dit geeft alle verschil- 
lende waarden van een field (bv. alle jaartallen). 





8, REN is een autorenumber. {automatische hernummering 
ven de data-list met regelnummers, per tien oplopend) 

9, TEST herinnert aan de vorige SET als je dat soms ver- 
geten moest zijn. 


3.2. Enkele praktische aanwijzingen : 


- sorteren van cijfers gebeurt dechts correct indien er altijd 
eenzelfde aantal DIGITS aanwezig is. Men moet dan ook een 
nummering opbouwen als volgt : 
bv. : OO1 


goe. 


enz... tot 999 


= in de "header",een (-1) field liefst altijd op een af- 
zonderlijke regel vermelden. 

- wijzig bij voorkeur de “header” niet. Is een wijziging 
toch noodzakelijk, tik de “header” dan volledig opnieuw 
in. 

- regel 1 van de data-list (? 18 = dk29 ; G.r) kan soms 
een blokkering geven door lusvorming. Dit kan men ver= 
mijden door deze regel uit de data-list weg te laten maar 
vergeet dan niet na elke EDIT of BREAK eerst terug naar 
2 18 = #29 te gaan. 


3,3, Onthoudt tenslotte goed dit : 


1° vooraf altijd goed nadenken omtrent de gewenste structuur 
van data-list. 

2° hou de fields zo bondig mogelijk (eventueel samenvoegen) 

30 doe eerst een test met een vijftal datagegevens 

he begin elk “record” altijd met een regelnurmer, uit de reeks 
(10-20-30 enz...) : 

59 als alles oké lijkt, tik dan de volledige data-list in, maar 
controleer alles bij de eerste run met het opvragen van bv. 
line en nummer, of line alleen. Grove fouten zult U ge- 
makkelijk terupvinden. 


Ovpelet t Ook als na zekere tijd er een foute melding is 
en U de correcte repelnurmers niet krijgt en even verder- 
op het opnieuw goed komt ! Dâár zit van een tweede fout 
die de eerste corrigeert. 

6° bij het pebruik van een printer moet U ook rekening. houden 
met de breedte van uw blad. 

T° een lange data-list kunt U het best “saven” en “laden” met 
1 200 baud. 


1, Vervolg 
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= Wij zijn thans bezig met het herschrijven van een "database "- 
programma om te kunnen werken vanuit &# 8 200 i.p.v. 2.900 N 
De data-list komt dan uiteraard in 2 900 en daar hebben wij 
in onze uitgebreide Acorn veel meer geheugenruimte. (namelijk 
tot #67 rr) 

Het werken vanuit het hoge geheugen peeft uiteraard op het 
scherm wel typische storingen maar eipenlijk zonder veel 
belang omdat data meestal toch uitgeorint moeten worden. 

- Een sectie van de Nederlandse Club is bezig met het her- 
schrijven van het programma zodat het ingekort en sneller 
kan werken, GOTO's worden ook weggewerkt. 

Misschien kan dan zo'n database in een EPROM van U K ? 


- ECD in Delft heeft nop een ander programa — namelijk "data- 
processor" 
Datavrocessor is in assembler en geeft eerst op het scherm 
een prachtige grafische titel met uitleg. 
Vervolgens moet men wachten tot alles ingeladen is. 
Met dit programma hebben wij nog onvoldoende ervaring. 


Het lijkt op het eerste gezicht nochtans weinig praktisch, 
Misschien komen wij in een volgend artikel hierop terug. 


Jacques MYNGEFER 
Coördinator A.C.R. 


J.H. Schoon Acorn Computerclub 
' ‚ Rotterdam 





Bonaweg 149 De Pintostraat ê6, 

3137 NH Vlaardingen 3052 NP Rotterdam, 
Telefoon: 010-7429004 

uw tet: Vlaardingen, 10 december 1982 


betreit:Morse interface 


Geachte heer Akkermans, 


Eerder dít jaar heeft in Acorn Nieuws een Morse-decoder- 
programma gestaan, waarbij ook een interface-schakeling 
stond afgedrukt. Vrij snel daarna werd via A‚N. medege- 
deeld dat deze interface niet zo best werkte, hetgeen 
ook mijn ervaring was. 


Zoals ik in september al schreef aan de heer Borghaerts 
ben ik zelf wat gaan experimenteren met diverse schake- 
lingen, waarbij de op ingesloten bijlage vermeldde 
interface tot nu toe (zo'n kleine 3 maanden) nog altijd 
tot volle tevredenheid heeft gewerkt. 


Ook bij deze interface kan het voorkomen dat er wartaal 
op het scherm verschijnt. Mijn ervaring is dat dát veelal 
wordt veroorzaakt door een zeer onregelmatig seinschrift, 
hetgeen men vooral op de amateurbanden nog al eens tegen 
komt 

Mede zendamateurs die bijv, een Tono communicatiecomputer 
gebruiken hebben te kampen met hetzelfde euvel. 


Over het algemeen is het wel zo dat ik met mijn interface 
rustig een dantaì telegrafie signalen door elkaar kan 
ontvangen, zonder dat die elkaar beïnvloeden, Voorwaarde 
hierbij ie natuurlijk wel dat de signalen iets in toon= 
hoogte verschillen, De interface ie smal genoeg om er dan 
één "uit te visgen”", 


Mogelijk is deze "alternatieve“ schakeling iets om te 
publiceren in hetzij een toekomstig regionaal blad, hetzij 
in het landelijke Acorn Nieuws. 


Overigene lijkt het mij ook mogelijk om deze inter: 
te gebruiken bij RITY, Daar wordt gewerkt met 2 tees Bk), 
mark en space, die t‚b.v. de computer dienen te worden 
omgezet ín 1 en O. Welnu afstemmen op mark (= 1) geeft 
automatisch een O voor space, ongeacht de shift van het 
signaal en ongeacht of er oude of nieuwe tonen worden 
gebruikt. . 


Ket vriendelijke groeten, Á* 


Hane Schoon 
y 





CORN computerclub 
rotterdam. 


MORSE — INTERFACE t‚b‚v, Acorn At 1 


De enige tijd geleden in Acorn Nieuws gepubliceerde morse-decoder- 
schakeling met o.a. 3 Opamps LF356 had enige nadelen: 





r moest nogal wat gedraaid worden e.d, voor de eerste karakters 
op het scherm kwamen, Bovendien was het "vangbereik” van de 
Interface zó breed, dat meerdere, naast elkaar uitgezonden tele- 
grufiesignalen gewoon door elkaar werden gedecodeerd en een on- 
leesbare tekst op het scherm werd geproduceerd, 


Al experimenterend ben ik tot de volgende schakeling gekomen (zie 
volgende bladz.), waarbij gebruik is gemaakt van een PLL-decoder- 
IC type 567, De schakeling is zodanig gedimensjdoneerd dat voor de 
gebruikelijke telegrafietoon van 800 À 1000 Hz het vangbereik van 
de decoder slechts ca, 100 Hz bedraagt. Voor hogere frequenties 
loopt dit op tot ca, 950 Hz bij een telegrafietoon van ca, 10 kHz, 
hetgeen in de praktijk nooit voorkomt, Bij lagere frequenties wordt 
de bandbreedte zelfs smaller; bij 5CO Hz nog maar 50 Ez a), het- 
wel moeilijk afstemmen wordt, 


De interface wordt met de ingang aangesloten op de luidspreker- 
uitgang van de ontvanger, Op de ontvanger wordt een telegrafie 
signaal opgezocht, waarna de instelpotmeter van 22 k langzaam 
wordt verdraaid tot de LED gaat meeknipperen in het ritme van het 
ontvangen telegrafiesignaal. 


De potmeter van 22k kan, naar mijn ervaring, het best als gewone 
potmeter worden uitgevoerd op het front van het kastje. Men heeft 
dan altijd de mogelijkheid om m‚b.v, de decoder in te tunen, het- 
geen nodig kan zijn bij toongemoduleerde telegrafiesignalen(op FM), 


De schakeling is bij mij nu ca, 3 maanden vrijwel dagelĳks in bedrijf 


en naar volle tevredenheid, 


Wel is (en blijft) het zo, dat onleesbare tekst op het scherm kan 
komen, Dit wordt vrijwel altijd veroorzaakt door een onregelmatig 
seinschrift (“plakken”), Een morseteken van een X aantal punten 
en een Y aantal strepen kan geen enkele computer ontwarren, zelfs 


de duurdere communicatie=computers, zoals Thono, niet. 


ad hahaha 
ware: bnrhoiaadadd +5 Vv 





ct 100 nr 

c2 100 ar RI 1K2 

C3 100 nF R2 M7Oâ 

Ch 470 aF Dt 22 Ka 

c5 1 tantaal LED 
100 jad Ie 567 


Een andere mogelijkheid voor wartaal kan liggen in de de snelheids. 
aanpassing in het programma (regelar. 1005). Men moet echter wel 
erg snel òf erg langzaam seinen wil het daarop misgaan. 

Sten ter controle eens af op bijv, Scheveningen Radio (ik neem al- 
tijd 4250 kHz) ; tussen berichten door wordt daar geseind: 

“de PCH20 8 K", 


Vlaardingen, 9 december 1982, 
Kane Schoon 


Pan cd 
Op de BREAK-toets drukken wanneer je dat eigenlijk niet bedoelt 
komt in de beste families voor. Een suggestie om de BREAK in 
serie ta schakelen met b.v. CONTROL waardoor je beide toetsen 
tegelijk moet indrukken om de break-functis te veroorzaken zien 
ve in het geschrift van ACORN CLUB NOORD. Gaat aldus : 






Break | 


tosts É 
onder= …* 


breken | 
akte ekekkekktkk 








ASSEMBLER CURSUS DEEL 3 s $ 8 


De vorise keer hebben we het szehad over relative adressing. 
Terecht zult u zich afvrasen waar dat "relatief" vandaan komt. 
Wet, in de assembleriisting heeft u na de code voor BEG (#F@) 
slechts een Ì byte setat sezien, toch seeft de disassembler 
(2808) bij BEG wei #28B2 aan. Wet dat zit zo: Dat 1 byte 
setal is een optel of aftrek faktor. Die waarde wordt bij de 
Prosram Counter opseteld en dat bepaalt dus het vervols adres. 
Het voert te ver om uit te saan lessen hoe de assembler de 
sprons zelf uitrekent. Dit sebeurt nl. in het 2-complement en 
dat is vooralsnos niet eenvoudig. Aan het hoosste bit (bit 7 
dus) et” de 6502 of het een sprons vooruit of achteruit is. 
Is hij "1* dan serinst hij terus en is hij “B* dan... 

Een losisch sevols hieruit is dat de sprons +128 en -127 bytes 
kan zijn, Een sprona op deze manier mas dus niet verder zijn 
dan #7F. Dit lijkt erser dan het is. Je moet al een beest van 
een pProsramma hebben: wit je dit ooit tesenkomen. Heeft u 
eenmaal zo’n lans prosramma dat weet u inmiddels ook wel een 
oplossins. Een oplossins zou zijn als BEG LLO bijvoorbeeld te 
root is: 

BER LL@ BNE LLi 

JMP LL@ 

iLLi vervols 








Als een relative serons te svroot is ( sroter dan #7F), dan 
verschijnt de boodschap “OUT OF RANGE" in beeld. Dat is de 
echte reden. Als tijdens de tweede “ronde” van de ascembier 
nos steeds “OUT OF RANGE" verschijnt: dan is de sprons (die 
ook wel ofset senoemd wordt) te sroot. Dit is ook de reden 
waarom bij een JMP (vooruit) seen "out of * verschijnt, 
terwijl de label nos niet bekend is. Oppassen dus. Wel 2 maa! 
assembleren. 

Het srote voordeet is dat een prosramma, dat uitstuitend 
retative spronsen maakt: overal "ersens” in het seheusen kan 
worden aezet, zonder dat er iets hoeft worden te veranderd 

want alles is reiatief. Als er een JMP tkke in zou staan: dan 
kan het dus niet. Wilt u het toch ersens anders hebben, dan 
moet de JMP worden aanserast.- Er bestaan speciale orosramma's 
die een stuk seheusen kunnen reloceren. Zo'n prosramma 
veranderd zelf de niet-relative spronsen. Hier kom ik tater 
nos wel eens op terug. 

Ook kan het sebeuren dat, als tabels ‘wild’ zijn geladen 
(met willekeurise setallen), er vreemde dinzen sebeuren 
tijdens het assembleren. Er Komen fouten die niet in de “error 
code lijst” staan. Bij mij is ERROR 59 een populaire. Het is 
daarom sterk aan te raden de labels aliemaat op WFFFF te 
zetten, voordat u assembleert. Zo worden deze moeilijkheden 
onz, d. Het kan heel eenvoudis door b.v. 

DIM LL 205FOR N=8 TO 2@ELLN=-ISNEXT N 











Wel: waartoe zijn we nu instaat na 4 atleverinsens 
Met altes wat tot nu toe behandeld is: kunnen we het 'hiat' 
vit de ATOM haten: dat na iedere control funktie (CTRL Gs CTRL 
L o.i.d.) eerst moet worden "escaped" om verder te kunnen. We 
moeten eerst bedenken hoe we het moeten aanpakken. 
1 HAAL TOETS BINNEN 
2 KIJK OF HET GROTER IS DAN #1F 
3 ZOJA. SPRING TERUG 
& ZONIET, VOER DE CONTOL FUNKTIE UIT EN SPRING DAARNA NAAR 1 


Zoiets heet probleem anaiyse. (iets kan pas worden opgelost, 
ais men het Probleem onderkent) 

18 REM CONTROL FUNTIE 

28 DIM LL2sLLB=-drLLi=-1 

30 P=#20005E 

4O:LLG JSRHFEI4G HAAL TOETS OP 


58 CMPS#@D IS HET DE RETURN TOETS 
68 BEG LL1 

78 CMP9#20 GROTER DAN #1F 

88 BCS LLi 

ld JSR4FFF4 VOER CTRL UIT 

128 JMP LLO SPRING NAAR LL@ 

11®:LLi RTS 

1283 

1282 #20A=#00 ; *#20B-#28 

14BEND 


We halen een toetswaarde op met JSR#FES4. De ASCII waarde 
staat in de accu? we kijken of het de return toets is: Zo ja 
sprins teruss verselijk of het sroter is dan de srootste 
control funktie (#1F), zoniet: dan via #FFF4 laten uitvoeren. 

In resei 138 wordt de “karakter intees waarde" die normaat on 
#FESA staat "verlest’ naar #2888. Na het RUNNEN heeft u tot 
aan een "BREAK" nooit meer last van pieoende contro! toetsen. 


De volgende vorm van adresseren is de “ABSOLUTE INDEXED“. 
Dit is een variant op de bekende LDA #8909. De srap is nu dat 
er wat achterstaat: LDA #5300, X 
De accu wordt seladen met de data van (#S00Rt{waarde van XJ), 
Ais seldt X=B dan wordt de accu setaden met de data van #8000, 
is X=tFF: dan wordt de accu seladen met de data van #8OFF. Een 
voorbeeid: 

18 REM VARIANT OP P. $12 

28 DIM LL2sLLi=-1iLt Bel 
38 P=tt2500:L 

4@:tLB LDASH20:LDXAHAG 
S@:LL 1 STA#SAOS. X 


68 STA#E1DD. X 
78 INX:DNE LI 
88 RTS 
SORFEND 


Dit erosramma ‘vult’ het beeld met spaties, na LINK LLO. Éen 
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Soort PRINT $12: maar de cursor bijft sewoon staan. De operand 
(48000 in bovenstaand voorbeeld). kan ook door een letter 
(mbasic variabete) aanseseven worden. Biivoorbeeid STA CX. 
Eerst moet welt gesteld worden C=#8000. U kunt alle varianten 
sebruiken behalve A,Y en X, omdat deze alt voor accu, Y en X 
vevister. Op deze manier kan je bijvoorbeeld een strins 
wesschrijven met behula van een ROM routine. JSR&FFF4. Deze 
routine print de waarde van de accu als ASCII karakter. Als u 
niet weet wat ASCII is lees dan hfd. 18 van de manval nos eens 
door, 

18 REM STRING PRINTER 

20 S#820B="WIE NIET SLIM IS, KAN HET NOG WORDEN" 

SODIM LLfsLLO=-1 

4OP=2580 £ 

Se:LLG LDYaNAB 

6O:LLt LDA#S220. v 


78 JSRIFFF4 

75 INY 

88 CMPO#OD 

bd BNE LLi 
108 RTS 


11885LINK LLOSEND 


Een andere veel sebruikte en vrij insewikkelde adresserings 
methode in de ‚hou ie vast: POST INDEXED INDIREKT. Het doel 
van die instruktie is het bewerken van data die overal in het 
heusen kan voorkomen: dus van #8388 tot #FFFF. De normale 
indexed, LDA #9800.Y, sins maximaal van #IEBZ tot HISFF. Deze 
bost indexed indirekt kan alles pakken. 

LDA C#BD). Y de schrijfwijze (syntax) voor deze instruktie, 
Deze instruktie sebruikt twee bytes van de zero-pase. 
Ilero-sase adressen zijn in principe, atle adressen tussen 
#2008 en HOOFF. Het noosste byte: wat ook vaak een pasina 
senoemd wordt, is 08, vandaar de naam ZERO-PAGE. In ons seval 
worden #BB en #B1 gebruikt. Dat voor te kunnen stelten wat deze 
instruktie doet, Schrijven we het even om in BASIC. We stellen 
dat #B® seladen is met HSA, HBI met M23 en Y met #O2. 

LDA (HBD), Y= 








Az?4Bi A IS NU #23 

Az 100 & IS NU #2900 
A=A+?#BO A IS NU #298A 
AzR+Y A IS NU #298C 


De accu wordt dus seladen met de data van adres #Z98C. De 
LDAC#BO).Y creeert dus ezen adres, waarbij IKB het pasina 
nummer is en (?8R04Y) het laasste byte van het adres. 


Voorbeeld een programma wat naar #E200. 
Hij copieert #2900-#5CBD naar # 
18 REM VERRUIZER 
28 DIM LLesLLOe-litLie-t 
38 P=#2500;t 
4O:LLB LDAAR2IGSTAREL 





58 LDYa#Ba: STY#BE 
68 LDASEB2; STAKBT 
78 STY#BA 
SB:LL1 LDA C#BD), Y 
3e STA (#B2). Y 
182 INY:BNE LLT 
118 INC #B53 INCHRI 
128 LDA #B1:CMPA#TD 
138 BNE ELi 
148 RTS 


158esLINK LLOGEND 
Dit zosenaatd ‘moven’ kan ook met de wonitor. Type na de 3 
eens in 8208(2900. SCOBM( return} 
Het is nu OOK ge'moved'. Probeer maar eens. Type hiervoor na 
de t 12 :B2freturn} (is selijk aan ?18=#62) 
:CDIBEl return} { is selijk aan "END’) 
U bent nu weer in de commando mode en type nu eens in LIST. 
‘Éen routine om b.v. mode 4 snet wit te maken ist 

18 REM WIT 

20 DIM LLisLti=-isL Get 

38 P=#2888:L 

4G:LLO LDASHSD: STAKB1 


5e LDY9820: STY4BA 
68 LDABEFF 
7O:LL1 STA (#BB,Y 
88 INY 
38 BNE LLi 
108 INC #B1:LDA#B1 
118 CMPa4993 
129 BNE LLi 
138 RTS 


1408:CLEARGSLINK LLO:END 
Niet verseten dus: LDAC4BB),Y ={(4B14H108)+?NB0+Y) 


Bij deze adresserins vorm is alteen het Y resister als "ofset“ 
bruikbaar. LDAC#BB).,X is dus fout. 

De tosische funkties wit de ATOM BASIC (and of en exor) kent 
de assenbter ook, Biivoorbeeld: 


LDA &#FF 111 1411 
AND @#AA 1818 1818 
STA #B@ 1816 1210 


2 


Ot een nand ot een nor te “maken” is nos een exor met A#FF 
nodis (aile @ worden 1 en andersom), dus 


LDA 24FF 1LAE 2811 
AND Stan 1819 1019 
EOR adFF 1ili 1441 
STA #89 0181 @181 
SAMENVATTING: 


“RELATIEF DOOR 1 BYTE 

“ALLE LABELS OP -1 ZETTEN 
“GEEN PIEP NA CTRL ? 

“ABSOLUTE INDEXED #2000, v 
“POST INDEXED INDIRECT (#B8).Y 
*LOGISCHE FUNKTIES AND OR EOR 


* IDEM NAND NOR 
*ROM ROUTINES: #FES4 
VEFFá 
A#CDSB 
Leendert 


ame RER MA ee 


18 REM >>> LRG €44 langere revels OP DE ACORN ATOM / UIT: ’YOUR COMPUTER? , 
DECEMBER 1982 / AUTEUR: ANDREM HOUSTON. 

20 REMDE REGELLENG TE HOROT BEPAALD OP REGEL 188 C'161 > 
HET MAXIMUM IS 255 KAR'S, 

30 REM HET ASSEMBLEER-AORES WORDT BEPAALD DOOR Q OP REGEL 9 / DE CURSOR 
VERANDERT TIJDELIJK IN #> 7 NA EEN BREAK HERSTELLEN MET: LINK Q 

AO REN KEEEEEKKEIIKEEESERKEEE KAAR EK 
bid PROGRAMMA VOOR LANGERE REGELS bi, 

SO REN SEEFEERKEEKE IEEE KKH 

€39 Qeh2600 


70 DIM EEC3) 

B@ FOR JaB TO 3; EELJ>eQ; NEXT 

30 FOR Kei TO 2 

100 Pea TIP 2 

er Een uitgeput printerlint 
120:EEB LDA SEELSSFF; STA #20A kan nog best een poosje 

138 LDA AEE1/256; STA #208 mee als U het lint schildert 
148 LDA CH*8" met een wattestokje met 
158 „MPC H208) stempelinkt t 

168:EE1 JSR #FEI4 Borghaerts. 


178 CPY €63;BCC EE3 
168 CPY @161:BC5 EE3 
198 CMP 8127:BEQ EE3 
CMP @24;BHE EE2 
8 LDY EAFF:STY #52 
'ER2 INC #52 
RTS 
NEXT 


K 
LINK Q 
END 


gehennn 8 


LN hg 


O Het is wel gebleken, dat het veranderen van de in 
zero-page aanwezige routineadressen heel wat moge- 
lijkheden biedt. Denk maar eens aan een snellere 
COS en tekst in mode 4. De handleiding geeft ons 
wat informatie over deze routines. Maar wat er nu 
precies aan de hand is met OSSTAR en OSRDAR (pag. 
192) wordt vaag onder woorden gebracht: ‘read! of 
‘store file's arguments'. Bij het aanroepen van 
FFD7 of PFDA wordt via zero-page gesprongen naar 
een nulletje (BRK) op C2AC. 

In de Basic-ROM worden de routines slechte één 
maaì aangeroepen en wel op CP55 en CF33, Daar komt 
hij lange bij het uitvoeren van een PTR-opdracht, 
beschreven op pag.151, Als een floppy-disk wordt 
gebruikt, staan in zero-page de adressen die rou- 
tines aanwijzen in de DOS-ROM, Omdat weinig mensen 
over zo'n DOS schijnen te beschikken, kunnen we 
bijv. in een zelfgemaakte toolbox PTR leven inbla- 
zen, als we toevallig zoiets kunnen gebruiken. 


O In combinatie met een argument îs PPR overal te ge- 
bruiken waar ook een array-element had kunnen staan. 
Voorbeeld: 

PTR(A)=PIR(B)+C 


Le | ne, 
oor PTR(A) wordt gesprongen naar CP4T. Daar wordt 
het volgende gedaan: 
1. JSR CSBC (lees argument) 
2. JSR C4DE (lees expressie achter =teken) 
3. JSR C3CB (resultaat naar '$52} 
4. JSR CP41 (argument in Y-regiater) 
5. LDX @#52 
6. JSR PFD] (hier hebben we OSSTAR) 
T. JMP C55B (vervolg BASIC) 
Wij kunnen wat met de gegevens Y en (B,X) doen, 
als we STRVECG (#212) hebben rechtgezet, 


Lef BED) 

er komt PTR in een expressie voor, Nu wordt er 
niet naar CF47 gegaan, maar naar CP28, Wij vangen 
de executie op, op het moment dat het argument, in 
het voorbeeld is dat B, in het Y-regiater zit, Dit 
gegeven moet verwerkt worden tot een getal, dat in 
!852 moet komen te staan, BASIC haalt hem daarvandaan 
bij het berekenen van de rest van âe expressie. In 
het voorbeeld wordt er C bij opgeteld, 


O Wat er over PIR(b) gezegd ie, valt onder JSR C4DE 
en dat is punt 2 bij de uitvoering van PTR(A). Het 
voordeel bij het toepassen van PTR in onse toolbox 
is, dat BASIC zelf het Anterpreteren doet en dat 
wij de gegevens alleen maar hoeven te verwerken. 


Als u In uw toolbox OOK DATA, READ en RESTORE wilt 
maken, kunt u met PTR misschien wel wat nuttigs doen. 
Normaal hebt u in zero-page maar één adres staan, dat 
een getal of string aanwijst in de data-file dat aan 
de beurt ís om gelezen te worden, U kunt dus ook maar 
één data-file gebruiken. Ik stel daarom een andere 
DATA/READ constructie voor, waarbij meerdere files on- 
afhankelijk gebruikt kunnen worden. Stel dat file 1 
begint op regel 1000 en de tweede op 2000, dan zou de 
eerste Bagic-regel er als sort uit kunnen zien: 

10 PIR1=1000; PTR2=200 
I.p.V. RESTORE worden hier de verschillende pointers 
goed gezet, De toolbox maakt dan van de regelnummers 
adressen. Het statement READ krijgt twee argumenten: 
één voor het filenummer, en een variabele, met of zon- 
der dollarteken, Verderop komt bijv, te staan: 

100 READ 2,X 
Een getal uit de tweede datafile wordt aan varlabele 
X toegekend. Dit mag geen invloed hebben op data- 
pointer 1, 
Het nadeel van deze contructie wíl ik ook niet verzwij- 
gen: het is volstrekt incompítabel met andere computers, 


Toolbox-makers zullen ook wel belangstelling hebben 
voor de volgende routineadressen, hoewel ze bij som- 
migen al bekend zullen zijn. Alle getallen zijn 
hexadecimaal, Tussen haakjes worden de toestanden van 
de registers a,x en y gegeven bij het einde van de 
routine, (% is: dit regiater wordt gebruikt.) 


CBBC (zoz) lees argument ( A2%,X=%,Y=% ) 

C8E1 plaatst variabele op 321+15,X in basic-accu 
15,X. (Ax%‚Ya%) 

C9A1 verplaatst 0,Y-3,Y naar bagic-accu 16,X. 
(A20,X=?4,Y=2?3) 

C99P idem, maar eerst wordt ?4 in X geatopt. 

CA2C roept G78B aan, X=?4-2, Y=16,X, en gaat door 
met CA37. 

CA37 iigpeeterseon 17,X in 321,Y e.v. 

Á: 

CC6E zet 58,59 in label 38D,X en 385,X (A=%) 

CDO9 tekst-input met vraagteken (A=%,X=%,Y2%) 

CD67 verplaats een string van (52) naar (54). 
eindigt met JMP C558. 

CD88 verhoog 15,24 met 16,25 met X als index. 
(A=%, Ke24} 

CEB6 JSR CT8B; JSR C3CB; LDY 3; RTS 

CEBP zet tekat,eindigend met $22 van (5),Y (Y=?3) 
in 140 e.v, en sluit dát met $D. 

(A=%, X=?4, Y2?3, 1522140) 

P291 verhoog 23 tot((5)+1),YAspatie. (Ax%,Y=?3-1) 
Als u na deze routine neerzet: DRC 3,hebt u 
een routine die de pointer ná de spaties zet. 

FB7A Wacht 2 seconden (X=0) 

FB81 Wacht } seconde (X20) 


Hans Admiraal, Waddinxveen 


1) 


2) 


3) 


4) 
5) 





TRUC met de basic - 


Wat te doen als je bezig bent een bacic-programma van een 
andere conputer geschikt te maken veor de ACORN en je 
ziet plotseling een GOTC-statement in een FOR-WEXT-loop 
staan? 

In Atom basic is dat niet onteperkt toegestaan.Dit 
blijkt bijvoorbeeld uit: 
10 FOR I=1 TO 19 
29 IF I=5 GOTO 49 7 
39 NEXT I 
49 PRINT “+” 
50 GOTO 19 


RUN 
tttetthtett 
ERROR 111 LINE 14 (Uit NAGIC-boek) 


Oplossing: verander regel 29 in IP I=5 2212221-1;5GOTO 4% 
Dit werkt omdat op locatie ?21 wordt bijgehouden hoeveel 
FOR-NEXT-loops op ieder moment actief zijn. Als dit aantal 
groter wordt dan 11 springt de interpretator in een error, 
Omdat we op regel 29 uit een actieve for-next-loop springen, 
kan het probleem dus verholpen worden door het aantal 
actieve for-next-loops met 1 te verminderen. 

We kunnen dit verschijnsel mooi zichtbaar maken als we 
regel 4 veranderen in PRINT ?2t en het bovenstaande program 
maatje een keer zonder en een keer met verbeterde regel 20 
uitvoeren] (doen!!!). 

Voor DO-loops geldt iets dergelijks (zie Magic-boek). 
Hier is echter locatie ?19 het tellertje dat het aantal 
de-loops bij houdt. 

Tenslotte wordt in 229 het aantal actieve GOSUB's 
bij gehouden. 


nterpretor 


Probeer het volgende: 

A=M100: B-#2490 

8Be"///// PRINT" "OK. vern (tet op gebruik DUBBELE string 
$A=$B quotes.) 
(erapje) 


Verklaring: #14 is het adres van de inputbuffer en als we 
intikken SA-$B dan hebben we 5 tekens ingetikt (vandaar 

5 maal een '/'.De interpretator voert dat braaft uit en ziet 
daarna én daarom een 'z' staan in de inputbuffer, 
waarna het volgende statement wordt uitgevoerd (print "ok.”*) 
dump alle variab elen met: 
€-12;F.I=M41POESAG 22 I= IjP.RI"="A" *GN.3P=B (alles op één 
regel input(t)} 

Cok hier ligt de varklaring weer in het gebruik van de 
inputbuffer op #19D. De 'A' wordt in de for-next-loop steeds 
vervängen door de volgende variabele. 

druk alle remarks aft 

I=218256-1; DODOI= Iet U0 114256 R4D45S2AIORI=T iP 8I'zU.I=T 2 


Door u zelf in te sturen voor de volgende keer!!! 


Frans van Hoesel 


De kast van de ATOM vergroten 


Jan Lernout. 


Wanneer de geheugenkaart ingeprikt zit, dan kan het deksel van onze ATOM 
nog net dicht. Door het feít dat dit deksel schuin verloopt 1s er boven 
de geheugenkaart nog een stukje plaats, maar niet meer voor een grote 
kaart, zoals bvb, de schakelkaart. Nochthans kan op de geheugenkaart 
weer een éénrijige konnektor gesoldeerd worden, die dan weer een kaart 
kan opnemen: men moet dan niet naar de buitenkant van de kast. Maar 
zoals gezegd dan kan het deksel er niet meer op. 


Daar hebben wij het volgende op gevonden. Snor ergens in de handel 

op een kunststofplaat van 1,5 à 2mm dik.Soort van matertaal doet er 
weinig toe: het moet wel voldoende stijf zijn,bewerkbaar bvb.met hobby- 
mes en verlijmbaar met epoxylijm. Daarvan snijden we stroken van 25mm. 
breed. (Dan kan de schakelkeart rustig bovenop de geheugenkaart.) 


We nemen telkens twee stroken terlengte van de breedte en lengte van 

de kast. Nu hebben we nog eens hetzelfde aantat en ín dezelfde lengte 
(wel iets korter in verband met de verstekken) maar dan 10 à 15mm breed. 
De eerste stroken zijn de "A* uit de tekening, de tweede zijn de "8" 
uit de tekening. Verlijm eerst de A en de B stukken. Let erbij op dat 
er plaats 1s voor het verstekken, an dat overtollige lijm uit het hoek- 
Je weg blijft. Laat Eén nacht harden (ís het eenvoudigste voor ongedul- 
dige lieden).Verlijm dan de korte zijden stroken met de korte zijden 
van de kast, na eerst gepast te hebben of de lengte U zal toelaten 

met de lange stukken een "vals verstek” te maken: zie tekening. Laat 
weer aen nachtje harden. In de dag voor deze nacht moet U in de achter- 
ste strook aftekenen en uitsparen de openingen nodig voor de verschilten- 
de sokkets: printer, bus, stroom, tape, video, R.F. en andere. Voor 

U de lange stukken op hen plaats lijmt zorgt U er weer voor dat de 
lengte goed is.En lijmen maar en laten harden. En nu is de kast 25 

mm groter:in gebruik valt het amper op dat het toetsenbord nu verder 
van de werktafel af staat. Laatste tip: ook de schroeven moeten nu 
25nen. langer worden.Ikzelf heb ze niet in de hanoel gevonden: maar 

mat een dunwandig koperen buisje (hobbyzaken hebben dat) en wat zaag 

en soldeerwerk zijn de originele schroeven wel te verlengen. 






Korte "A stroken 
Korte “B' stroken 


Korte °B' stroken 


Deksel 
Dis! Vn 


A c 


5 achter 
Lange TA stroken 
Bodem van vóór en achterkant 
Atom- kast " u 
Vals verstek C boven zicht ) 
Snede C-C 


ADRESSERING (in HARDuware ) {G. Borghaerts) 


Adreslijnen , 
tOnze’ 6502 heeft 16 adreslijnen: 





Af t/ma 15 Boor = Mi 
hj 1 Bepalen 1e adres-cijfer 6010 2 
A 13 Elk levert één bit, tesamen dus 0011 = 3 
A 12 A bits. Het adres-ciĳfer volgt uit 0100 = 4 
deze á-bits code. Zie lijstje —% Qi0te 5 
0110 = 6 
IN do Bepalen 2e adres-cijfer oem 7 
A9 Idem 1000 = 8 
A 6 1001 = 9 
1010 = A 
Verder A7 t/m A4 bepalen 3e clifer 1011 = B 
. 4 1100 «= C 
en A 3 t/m Af bepalen 4e cijfer. soi D 
1110= £ 
A15 t/m AG zijn de High Order bite. Uile F 
A 7 t/m Af zin de Low Order bits. 
Een adres, b.v. €282 wordt op de Adreslijnen gezet sis: 
A15 A14 A13 AIB A11 A1C-A9 AB A7 AG AS'A4 A3 AZ AI ag 1 lijn te 
1 1 0 0 9 0160 1 011 0 0 10 tnaog' = 
5 volt 
=E = 2 LK! 2 0 = "leag' 


= Q volt. 


Bestaat (b.v{) de gehele geheugenruiate ven 6ák, uit 161C's van ieder 
âk. dan kunnen deze 16 IC's worden geadresseerd met behulp van 
de adreslijnen A15 t/a A12 = 16 mogelijkheden nl. # t/m F. 


Deze 4 adreslijnen hie: An een decoder met 4 pinnen voor de 
ingsngen A15 t/m A12 en 16 pinnen voor de uitgangen fd t/ar 


Elk van deze 16 pinnen wordt verbonden set de CHIP SELECT pin van één van de 


16 IC's. Zijn de Adreslijnen A15 t/a A12 achtersenvolgens dus HH L L, dan 
zorgt de decoder ervoor, dat de Chip-Selot lijn near f gaat van alléén het 
IC waarvan het eerste adree-cijfer C ís. 


De reet ven de adzreslijnen, due A 11 t/m Af gean rechtetreeke naar de 
pennen van a l le IC's en decoderen binnen de IC's het prciese adres. 


Van het adres C2B2 wordt due de C gedecodeerd door de 4 naar 16 decoder 
en 282 bÍnnen het IC. Hoewel al le IC's op hun pennen 282 krijgen 
eangeboden, doet alleen IC C er tata mee, omdat alleen ven dát IC door 
de decoder de CHIP-SELECTlijn is ‘laag! gezet. en het IC ‘functionsert!. 


Bestaat de oeheugen-ercchitectuur, de Memory-fap, zoels ín dit voorbeeld 
dus uit 64 k, verdeeld over 16 IC's van 4 k, den kunnen deze edressen 
worden gedecodeerd met 6én decoder IC '4 near 16° en 16 4k. IC's, die 
elk hebben 6én Chip-Select ingang en 12 Adresingangen, n.l. Af t/m A11. 


Nadenkertje: Een Zk. IC heeft dus 11 Adresingengen nl. Af t/a A10 
De hogere adresbits A 11 t/m A15 soeten we den zelf decoderen met 
een 5 near 32 decoder. Zo'n decoder ís er niet, dus doen we dat in 
stappen. Waarover de volgende keer. 
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ADRESSERING (án 5 OF T ware } (G. Borghaarts) 


amen 


Adresseren In Software doet, net els in Hardware, ook alleen de 
uProcessor, bij ons de 6502, Adresseren betekent hier achter het 
opzoeken van een adres. Het gaat daarbij eltijd om de in houd 
van dat adres, De uP, kan mat die inhoud mear twee dingen doen, 
nel. a) kijken wat daar staat of b) er iets inzetten. 


"kijken wat er setast” betekant eltijd die inhoud overnemen, door— 
gaans in een register en meestal in de ACCU. De inhoud van het 
geheugen verandert daar níet door. De uP. “kijkt” dan in dat re- 
gister door de inhoud met andere bit-patronen te vergelijken. 


De inhoud van een geheugenplaats met b.v, 1 verhogen kan de uP 
dus níet rechtstreeks, De weg is + Lead die inhoud in (b.v,} X, 
verhoog X met 1 en zet het reaultaat weer terug. Er zijn dus 3 
routínes voor nodig. Oie routines worden in gang gezet door het 
intypen van MACHINE-INSTRUCTIES (de mnemonic!s) , in dit geval 
door LDX . . « , INX , STX . » 


Type maar eens in, precies wat nu volgt : (r} betekent ret.tosts. 
(lox # soor ; inx 3 stx # goor 3 ars (r) (dus géén sluithaak) 

Er verschijnt dan het volgende verhaals 

0 8728 AE OF 80 LDX # 800r 


Q 872E E8 inX 
0 872f BE OF 80 STX # a00F 
0 8732 60 RTS 


Type dan LINK # 872B (r) en midden boven in het scherm vere 
schijnt een } Met nog eens LINK =f 8728 wordt dit een * 


Deze wijze van ADRESSEREN, direct zelf het adrea opgeven, heet 
A DIRECTE of ABSOLUTE AORESSERING. In voorbeeld Codes AE en BE 


Je kunt, zoala ín het voorbeeld, eerst de inhoud van de geheugen 
plaats in het Register X helen. In dit geval was dit % 20, de 
code voor een lege plek. (Spatie). # 21 is de code voor } 

(Zie Uw geplastificeerde kaartje). 


U kunt ook onmiddellijk # 21 in Register X zetten met LDX #21 
en dan dit Register naar de gehegenplaate overbrengen, dus 


Uoxe #21 ; stx # BOOE ; RTS (r) en dan LINK het eerst verschijnen- 
de adres links boven in het rijtjes doet precies hetzelfde, Code A2 


Dit onmiddelijke aanroepen van het X register heet ONMIDDELLIJKE of 
B _IMMIDIATE ADRESSERING Dus altijd met 'apestaart' (bij de Atom). 


Als U deze voorbeelden onthoudt, onthoudt U gemakkelijker de namen. 


Bij het directe of absolute adresseren in het eerste voorbeeld, 
adresseerden we naar een 2 byte adres. Nu zijn in feite a 1 1e 
adressen 2 bytes ( 16 bits = 2 bytes}. In het voorbeeld was de 
instructie dus 3 bytes 'lang', één voor de 'OPERATOR! ook wel 
‘OPCODE' genoemd en tees voor het adres. (De 'OPERANT' genoemd). 


In ZERO-PAGE zitten de adressen 0000 t/m OOff . In dit gebied 
ás de eerste byte dus altijd O0 . Laat je die weg en geef je het adres 
met één byte op, dan adreeseert de uP naar de ZERO-PAGE. 


Dit ís een andere instructie, die maar twee bytes ‘lang! ia, een 
andere 'OPCODE' heeft en sneller gaat. De 'OPERANT! is dus 1 byte. 


C Oeze adressering heet (uiteraard) ZERD-PAGE ADRESSING. 








RELATIEVE ADRESSERING heet elke instructie, die begint met 
een 8 (Branch, oftewel vertak, als «. « .). 

De naam wordt logisch als men bedenkt, dat de Program Caunter 
niet zomaar naar een adres kan ploffen als hij niet eerst de af 
stand berekent naar het nieuwe adres,in relatie tot waar hij op 
dit moment nag staat. Doet (deed) U ook met slootje springen. 
De 6502 heeft maar 1 byte ter beschikking om de grootte van de 
sprong in uit te drukken. Van die 8 bits wordt één gebruikt om 
aan te geven of de sprong vóór- of achteruit moet. Over zijn 
dan 7 bits, dus 27 = 127 stappan + of — (stap 0 ís nix) 





In het allereerste voorbeeld werd het adres ABSOLUUT of DIRECT 
gegeven. Je kunt echter ook laten springen naar een ADRES, dat 
op een ADRES staat. Je zegt dus niet (direct) ga naar dát adres 
maar (indirect: Ga naar het adres, dat je vindt op dát adres. 

Je laat de P.C. twee keer lopen, Heet INDIRECT ADRESSEREN en 
kan alleen met de JMP (jump) instructie. 

Om aan te geven, dat op het eerste adres niet het adres zélf, maar 
de inhoud van dít adres als nieuw adres bedoeld wordt, zet 
men dit adres tussen haakjes. Ous (bev. ) JMP (# 6836), Betekent 
dus op z'n Hollands: Ga kijken op /6836 waar je heen moet. 


In het allereerste voorbesld gebruikten we de instructie INX . 
(Verhoog inhoud X-Register met 1), Geen adres erbij vant de uP 
heeft dit Register în zijn bijkeuken. Een instructie, waarbij alle 
gegevens van wat waar met wat moet worden gedaan in één byte staat, 
heet IMPLICIET (Implied) ADRESSEREN. 








Tenslotte de grote ellende, het GEINDEXEERD ADRESSEREN. 

We zullen proberen om het prettíg te houden: Wanneer we willen 
peeken of pooken ineen ree ks adressen, kun Je bij een 6502 
niet zeggen: ‘Ga naar adres A, daarna naar adres A+1, dan A+2'ete. 
Een a d re s kan niet met 1 worden opgehoogd, daar is geen instruc- 
tie voor. Een regieter kan wél mt 1 worden opgehoogd, 
zie INX,of verlaagd zie DEX. Grapje duss we geven het adres op 
als de SOM van een getal en de inhoud van register X of Y. Na 
vervolgens INX wordt het adres dus 1 byte hoger, enz. B‚v. voor 
bytä'na byte overbrengen van een pregram naar een anders ruimte. 
Omdat een register maar frr (256) als grootste getal heeft kun 

ja zo maar 256 adressen bestrijken. De tCarry'gaat verloren. 


Dan PRE-INDEXED ADRESSEREN : B.v. STA (/BU,X) (Xreg.=heve2)} 
Wat gebeurt? Het INDEXEREN staat óók tussen de haakjes, gebeurt dus 
EERST (Zie Pré ).Dus #80 +X = #82. De byte die nu op fe2 staat 
wordt genoteerd als laagste byte van een adres {noemen we LL) en de 
byte, die op één adres hóger staat, dus op #83, als hoogste byte (HH). 
Op het adres HHLL wordt nu de inhoud van de Accu gezet. Proberen? 
Type maar in, alles achter elkaar : 

P= A0 ot (tone #77; LOxd 23; STA(#BO,X);RTS (r) 

Daarna: LINK #2900 (r} en controleer met P. &7# 3000 (geeft 77) 
N.8. Pré-indexeren kan aïleen met register X, En alleen ín Zero-page. 


Tenslotte POST-INDEXED ADRESSEREN : B.V. LOA( #82), y Weer gebeurt 
eerst wat Eussen haakjes staat, dus kijken wat de inhoud is 
van adres #B2 en pas daarna (póést) wordt die inhoud geindex- 
eerd met Y. Dus bev. met 3 opgehoogd. Dit wordt genoteerd als LL. 

De inhoud van één adres hoger wordt genoteerd als HH. Daarna wordt 
de inhoud van adres HHLL geladen in de Accu. Deze grap kan alleen 
met het y-register en ook alleen via Zero-Page, Bij 
post-indexeren gaat de 'Carry' niet verloren. 


BINAIR-DECIMAAL EN DECIMAAL-BINAIR 


CONVERSIE 


Het grote voordeel van het onderstaande programma 
is,dat het ook gedraait kan worden vanuit het Read- 
Only=-gedeelte van de 16K-RAM kaart.In dat geval kan 
namelijk geen ruimte achter het programma gereserveerd 
worden. voor normale array-variabelen(AA tot ZZ) omdat 
dit geheugendeel "op slot" sit.Daarom is in dit prom 
Granma gebruik gemaakt van byte-vectors waarbij de 
variabele(A tot Z)gebruikt wordt om het basis addres 
op te slaan en in dit geval dus gewenst.(in het pro= 
&ranma komen ook strings voor,wat in pricipe ook 
byte-vectors zijn), 

Het programma is als volgt: 


10 REM 2-10;10-2 conversie 

20 U=#804B-#80 

30 P.$12,"2 NAAR 10 (1)"!#40 NAAR 2#*t 
40 IN.N;IF N=2 G,120 


50 Ze1;Q=0 

60 IN,$B;L=LEN(B)=t Hans van der Lint 

JO FeleL TO O STEP=4 Roosendaalsebaan26 

80 w=0 Oud=-gastel „tel :01651=1553 


90 IP B?X=49 Wai 

100 Q=QtWa2Z ; ZZ 

110 Ne 5620;5P.Q; LINK eFFE3;G,30 

120 G=0;IN,P;IF Pal P,"A";LINK #FFE3;G.30 
130 A=0 

180 UtAaP$2;PaP/2 ;AmA+1 

150 IF Pal U?A=1;G.170 

170 FeXeA TO O STEP =1 

180 P.U?X;N, ;LINK #FFE3;G, 30 

200 END 

160 G,140 

N.B. bij de vraag in regel 30/40 
dient men te antwoorden met 1 of 2, 


schakelkaart 


Van de schakelkaart is een beperkte serie aangemaakt en 
tat dusverre geleverd aan ons bekende herd- en software 
deskundigen. Dit omdat de horizon van de mogelijkheden 

met deze kaart óók door de ontwerpers bij lange níet kon 
worden overzien, Er hebben zich "clusters! gevormd van 
gebruikers die programmatuur ontwikkelen, Eenieder dartelt 
naar believen rond met in Eprom bestaande utility's en 
statements, zowel als met allerhande nieuwe, Het ís nog 
veel te vroeg om te kunnen vergelijken, wie nu op het beste 
spoor zit. 


Gemsenschappelijk hebben alle gebruikers, dat hun fOATING- 
POINT is gewijzigd. Voor het ‘doorsturen! van de nieuwe, 

niet in ATOM-ROM's aanwezige instructies stuurt de F‚P, 

niet meer door naar AGOO maar naar EOOO, alwaar dan uit= 
gezocht wordt naar wie of wat dan most worden doorgestuurd. 
Oit kan zijn naar: a) dezelfde E-ruimte b) naar een van 

de A0OO sockets al dan niet met initieeradres van de betref 
fende routine c) naar de geheugenkaart d) terug naar 
C558 als ergens een haar in de soep zit, 


Wat dit doorsturen door de F‚P. ROM betreft zijn er twee 
‘scholen' te bespeuren: 


1) Arie Marchal zocht naar een ‘universeel’ gewijzigde F‚P. 
die eens en vooral bruikbaar is voor ieder machine, welke 
kaarten er ook inzitten of niet, Oók voor de 'kale' 2k2. 


Hij bereikte dit, door in de FP. 5 bytes te wijzigen, 
zodat de .f‚P. werkt als een J-=weg schakelaar. 

De F.P, kijkt nu eerst of de machine een schakelkaart heeft 
met een opvangroutine op (vanaf) EOOO, Zo ja, dan dóór= 
sturen, zoniet dan kijkt de F.P, naar A000 met precies 
hetzelfde doel. Zit daar ook nix, dan stuurt de FP. 
doer naar CS5S58 waardoor de controle over de machine 


wordt teruggekregen. Adres D4B1 was AO wordt EO 


Deze wijzigingen zijn : ” D4Bá4 * DO " fo 
” D4BC * 03 " 83 
hid DáCI * 5B "02 
” D4C2 * C5 n EQ 


2) Foppe Bouma laat zijn ‘jumper! (Zie Acorn Nieuws 5 blz 39, 
en AN. 6 Elz 13-16 onder program EPC.FB) niet meer be- 
ginnen op E002 maar EOS52, Zijn Flaating Point kijkt dus 
niet naar €000 en E00 maar naar €050 en EOS1, 

Door deze eerste 50 bytes vrij te laten valt er nag iets 

te doen met de ín de ATOM standaard aanwezige Los com 
mando's, Mogelijk is, om deze dan in de schakelkaart in 

de 4k ruimte E‚,O op te vangen en door te sturen naar de 

op E,1 aanwezige Ak DOS ROM voor wie een floppy gebruíkt. 
of er wat anders mee te doen. 


Een compromis tussen 1) en 2} lijkt mij een fluitje van een cent, 
voorlopig lijkt het mij echter het beste or. elke programmeur zijn 
ideën vrijelijk te laten uitwerken. En in Maart of April een 
compleet verslag samen te stellen. En te beraadslagen. 


Barghaerts. 
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EX 


2: 


PRINTENSERVICE 


In ACORN=NIEUWS Nr. 7 '82 namen wij een schema over voor 
een EPROM Programmer uit Practical Computing, Deze program 
mer werd, naar wij hoorden, door meerdere Jeden gebouwd, En 
schijnt het prima te doen. 


Piet van Diemen, onze "LAY-OUT man * maakte voor deze program= 
mer een keurige lay-out. We drukken e,e,a, af op de blz. 6t e.v. 
We kunnen dit printje als ‘federatieve dienst! uiteraard in 
een groter aantal bij een fabriek laten maken, De prijs staat 
dan natuurlijk weer in verhouding tot de grootte van de serie. 


Zéér ruw geschatzel het met zo'n f 17,- wel bekeken zijn 
Inclusief alles zou de programmer dan rond de f 60 komen. 


Voor de SCHAKELKAART blĳkt een groeiende belangstelling. Wij 
aarzelen om een nieuws serie te bestellen aangezien zich on- 
verwacht prblemen blijken voor te doen bij de levering van het 
IC'tje 74 5 133 ‚een 13 NAND , prijs circa f 1,50. Zogauw 
we voor de zekerheid een fike aantal van die dingen in voor- 
raad hebben gekocht (in hui s hebben dus) bestelten we een 
nieuwe serie schekeïprinten. 


Van de CMOB — GEHEUGENKAARTEN draaien er in de Club momenteel 
honderden. De verwachtingen, die de ontwerpers van deze kaart 
hadden, worden dik overtroffen. Elk 2k CMOS Statische RAM IC 
dat momenteel steeds goedkoper verkrijgbaar wordt, doet het op 
de kaart uitstekend. Zal wel uitdraaien op een nieuwe bestelling. 


Aan Piet van Diemen is gevraagd om een lay=cut te maken voor 
de RS 232 uit Acorn Nieuws Nr 7 '82 , Ean serieBle vitgang 1/0. 
De belangetelling hiervoor weten we nog niet. 


Van de Geheugenkaart en van de Schakelkaart zijn de hoge proto- 
type-kosten grotendeals terugverdiend, zodat de prijs kan dalen 
afhankelijk van de serievgrootte uiteraard. 

Bij de Schakelkaart denken we aan fá5 tot f 50. 

Bij de Geheugenkaart aan pakweg f 35 tot f 40, 

WILT U , PER AANGESLOTEN CLUB, UW BESTELLING VAN PRINTEN DP 
EEN LIJST ZETTEN EN DEZE AAN UW CLUB-PENNINGMEESTER GEVEN 7 
Wij krijgen die dan door en bekijken zo snel mogelijk wat we doen 
kunnen. Ondertussen zoeken we verder naar de 74 5 133 . 
Blijft de 133 problemen geven, den zullen we de lay-out wijzigen. 
U hoort de oplossing zo snel mogelijk van Uw Club-Hardwareman. 


G RAPIILCS MET DE ACORN A 1 OM 


Heeft u wel 'ns een programma-listing gezien die er zó uitziet? 


10 PRINE "S= 
20 PRINT "HALLO" 
30 PRINT "=S 


40 END 


Dit is met onze Acorn niet mogelijk. Of wel?,..sssee« 

Stel dat u bovenstaand programma in de Acorn witt zetten. 

Tik dan eerst gewoon het programma in, maar ánplaats van de gra- 
phics tussen de aanhalingstekens gewoon spaties, 

Tik dan in de directe mode in: 


IETF P 


Als u nu een letter indrukt zal er, inplaats van de letter, een 
graphic op het beeldscherm verschijnen, volgens onderstaande tabel. 
Nu gaat u met de cursor=besturingatoetsen naar regel 10 en dan 
met de COPY-toets tot rechts naast het eerste aanhalingsteken, 

Tik dan net zolang een L in tot u voor het laatste aanhalingste- 
ken bent gekomen, tík de COPY-toets in en ga naar regel 30. 

Doe hier hetzelfde, 


Als u dit gedaan hebt kunt u de computer geen opdrachten meer 
geven, want het is onmogelijk om ook maar één letter op het scherm 
te krijgen. 

lef dus deze toestand op door op BREAK te drukken, tik vervolgens 
OLD in en u kunt het programma RUNnen of LISTen. 


Deze methode heeft ala voordeel dat men in een listing kan zien 
welke graphic er op het scherm gaat verschijnen. 
Het spaart bovendien geheugen ruimte, 


N.B, Als u de SHIFT-LOCK-toets gebruikt worden de karakters grijs, 
Voor andere graphics moet u in geheugenplaats E7 een ander 
getal zetten. 


ir nl -aln 


led 


Frank de Groot 
Schoolstraat 32 
165 HC Halfwe 
tel. 02907-25184 MH) 


he. 





Nogmaals; Ombouwen TV tot monitor, 


Na lang speuren en uitproberen kwam ik tot de conclusie 
dat er iets mis is in de computer zelf, Ik had veel last 
van storing in het beeld; zoals streepjes op het scherm 
als er een toets ingedrukt werd, geen scherp beeld en 
"wippen" van het beeld, 


Wat is er nu mis met de Acorn Atom? 

Het valt eigenlijk nog wel mee, Bij twee TV's is de conversie 
toegepast met goed resultaat en bij twee Atom's was het 
euvel hetzelfde, dus zullen er wel meer zijn die niet 
helemaal goed functioneren. 

Het gaat om 2 transistoren die het video-signaal naar 
buiten sturen via connector 4. 

In mijn Atom zaten op de plaatsen van Q1 en 92 twee stuks 
BC 309, Zeer dringend wordt aangeraden deze transistors 
te vervangen door 8C 547B's, Het doet wonderen. 

De aansluiting is dezelfde als voor de Bf 308, dus dat 
kan geen probleem opleveren. 


Verder is het aan te raden om link 6 te sluiten om geen 
last meer te hebben van een beeld met fluctuerend contraste 
Dit is natuurlijk afhankelijk van de voedingsspanninge Dit 
heeft eerder ook al in Acorn Nieuws gestaan, 

Een bijkomend voordeel is een betere synchronisatie van 

de TV op de 60 Hz van de Atom, 


Tot zover de verandering aan de Ater, 
Nu gaan we met de TV's aan de gang. 
Twee voorbeelden, 


Philips TX. 

Op de bekende manier; in het middenfregvent gedeelte 
het spoeltje 5248 aan Ben kant uit de print halen en 
met een coax=kabeltje {soepel en dun} als volgt man 
teren. 








AARDE HAN STOP 1 OTN LELIJK 


De weerstand van 4k? zorgt ervoor dat de video-emitter= 
volger T5350 op de zelfde ingangsspanning terecht komt 
als in de normale TV stand, Tevens is dan voor een goed 
kontrastrijk beeld gezorgd. 


Problemen met het "lopende" beeld zijn op te lossen met 
het vervangen van C511 van 1,5 nF door 10 nf. 

Bij een goede instelling blĳft het beeld nu zowel in de 
normale TVY=stand als in de monitor=stand mooi stil staan. 


Bij problemen met een "waggelend" beeld (bij de TX wil 

dit nag wel eens vaak optreden) is het aan te raden de 
net=trafo vit het toestel te verwijderen en op een afstand 
van ten minste 20 cm in een apart kastje buiten de TV 

te monteren. 

U kunt natuurlijk ook een aparte voeding bouwen en via 

de accu ingang een 12 tot 15 Volt geliĳkspanning toevoeren. 
Zuinig îs de TV in die stand echter niet, Er moet minimaal 
met een stroomverbruik van 1 tot 1,5 Ampere gerekend 
worden, 

Een schema voor zo'n voeding is bve 





Gold Star (Japans produkt) 


Hierbij is een extra emitter=volger gebruikt om een te 
sterke belasting van het signaal te voorkomen, 
Een en ander ziet er zo uit 


nek ek 






stek an V 


van AlorRn MAAR Ty 


(viEg 
 VERST.) 


Een 12 Volt-leiding of daaronder is altijd wel te vinden 
in een portable TV, 


Voor mensen die een TV hebben die een vrij groot signaal 
gebruikt tot 4V tt (even in het schema nakijken) en voor 
mensen die een reverse beeld krijgen is het volgende schema, 
Voor de reverse-beelden alleen het laatste stukje gebruiken, 
Vaor de versterker (regelbaar van 0 = 4 Volt tt bij 1 Volt 
tt ingang) het geheel gebruiken, 

Je weerstand van 75 Ohm vede verzwakker naar eigen inzicht 
toepassen, 

Bij gebruik van alleen de Video Reverse schakeling in de 
ingang wel een elko opnemen van «par. Anders weglaten, 
want dan komt 'ie er dubbel in. 

Gebruikt zijn allemaal tantaal elko's, 


14 V 





7 Blur Brig Ber} 
verzwalker wrsterker 


Succes, 

Diek Protzman 
Meiboomstraat 55 
7415 LG Deventer 
05700-34808 





ec su 


feverse wdeo 
# zie tekst 


Wat u kunt verwachten na het uitvoeren van deze werkzaam- 
heden is een stabiel stilstaand beeld. 
Ook met soft YDU ìs nu uitstekend te werken. 


Bij eventuele problemen kunt u contact wet mij opnemene 
Bij voorkeur op maandag= en vriĳdagavonde 




















A-D CONVERTER 


Ket het IC CAS162 is een neuwkeurige, doch relstief 
langzewe A/D converter te maken. Bet de Schakelaer 51 
is in te stellen of per seconde 4 of 96 maal gemeten 
wordt. Ala de Schakelaar ín de middenstand staat wordt de 
uitgeng gelatched. Met de 10k inatelpotmeter wordt de 
nul-ínstelling geregeld. Met de 47k wordt het bereik 
ingesteld. Het beste kan aen hiervoor een 10-slagen 
instelpot hemen. Pat bijgevoegd programme kunnen de 
date worden binnengehaeld. 


Hat is een programme, waar veel variaties op kogelijk zijn. 
Zo kun je b.v. 256 metingen in een array zetten en deze 
in zode & uit lsten tekenen. Ook kan er een analoge 
Joy-stick sangesloten worden (Een luxe pot-meter dus). 
searwee dan allnrlel vreemde vogels, space wuppies en 

wat al moer near beneden te knallen zijn. 


Ten behoeve van ser Schekslasr om te kunnen schisten is 
BIT 4 van # 8800, dus 8 6 nog vrij. De schakeling kar 
vrij eerwoudig op een geatjesprint worden gemaakt. 

Ten overvloede wellicht! VAL $ ie een Ploatíng-point 
statement. 


B 
Veel plezier ermee ! L.Bjj te. 
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OREM A/D CONVERTER 
DREM DATA IS DE STING GETALLEN, WELKE DE UITLEESWAARDE IS VAN 
BREM DE ANALOGE WAARDE. VOOR UITLEZING DP HET BEELDSCHERM VULT 
DREM U DUS #209B IN. 
BREM DE OBJEKT IS DE BESTEMMINGSPLAATS VOOR HET ASSEMBLEREN 
DREM DE EERSTE 6 PLAATSEM ZIJN GERESERVEERD VOOR HET MASKEREN 
BREM VAN DE IN TE LEZEN DATA. 
BREM ONTWERP PRINT D. van Riiswijk. 
BREM ONTWERP PROGRAMMA L.Bisnaste TEL. 02286-12209 
BIN, “WAAR DE DATA"Q:G=0-1 
BIN. "WAAR DE OBJEKT"ZsP=Z 
OM=ARSRO: ! P=KTOADEO3 P=P+S 
OR=P—1 5! P=KCOABEOF P=P+E 
ik LLE3F. N=QTOEF LLNeE-1 iN. 
e 
sLL@ LDYS3 
Li LDA Z-l,Y 
iLL2 BIT MsBNE LL2:LDA R‚Y 
GBIT MsBEG LLi:LDA MsAND91S 
OORAI4E: STA Q, Ys;DEYSBNE LLi 
SLDASLIIJFSTA D+4RTS:I 
BREM ONDERSTAAND VOORBEELD LIST EEN RIJ GETALLEN, WELKE OVER- 
OREN EENKOMT MET DE UITGANGSWAARDE VAN DE ANALOGE PRENT, 
BDOSLINK LLOsAeVALELCOHID 
er. a su. 0 
) WAAR DE DATA! #2508 
WAAR DE OBJEKT?#2BEF 
158 2815 
158 2815 AQ BE ‘LLS LDYAS 
178 2817 B9 BF 28 slLi LDA Z-1,Y 
188 281A 2C 98 BE :LL2 BIT M 
184 Z81D D8 FB BNE LL2 
180 281iF B9 í2 28 LDA RY 
198 2822 2C DW BE BIT M 
198 2e25 Fe F@ BEG ELI 
198 2627 AD 88 BE LDA M 
198 282A 29 AF ANDA15 
209 2820 09 50 ORAA4S 
208 ZE2E 99 FF 27 STR OY 
208 2851 88 DEY 
200 28552 DB EF BNE LL1 
218 2834 A3 BD LDAS1 2 
210 2836 SD AE 28 STA W+4 
218 2855 60 RTS 
@ 
974 
378 
265 
272 
374 
366 
77 








eleldtuur infokaart 76) s-computer-1C's4 | „Einen 


EPROM's 
aansluitingen 


vriendelijke toestemming de uitgever. Febr. *83 





PILOT :; PILOT : - PiLOE- z PILOT : PILOT 
« - 


Wie met PILOT gewerkt heeft, weet dat de editor 

die de taal bevat, niet al te veel voorstelt. 

De ACORN ATOM heeft echter een prachtige editor voor 
zijn basic-programma's, Het onderstaande basic-programma 
maakt het mogelijk om m.b.v, de ATOM-editor PILOT 
programma's te ontwikkelen. Men schrijft ergens in het 
geheugen cen PILOT-programma, maar nu met regelnummers 
ervoor, Vervolgens start men het onderstaande programma, 
Dit programma vertaalt het in BASIC-formaat geschreven 
programma, naar een echt PILOT-programma op ##2E00. 
Vervolgens kan met LINK/#2A00 de PILOT-interpreter 
gestart worden, 

Dit is het programma: 

10 P,$12' '*PILOT-PROCESSOR" ! * 

20 INPUT"BEGINADRES VAN TEKST"T 

30 Paf{2800;Seff2E00;T=T+3 

40 DO 

50 IF 2T=ff20 THEN T=T+1;GOTO 50 

60 $sa$T;$P=ST 

70 TeT4LEN(T)+3;S=S+LEN(S) 

80 2520; S=S+1 

90 UNTIL $Pa"EINDE" 

100 P,$12''*PILOT-YROGRAM READY"'!' 

110 END 


PILOT is een taal voor educatieve toepassingen, 

Zodra een leerling echter achter de computer kruipt, 
om een PILOT-programma af te werken, mag de PILOT- 
editor nog slechts één commando herkennen: nl. het 
“START HET PROGRAMMA" commando, 

Dit kan zen bereiken door het volgende uit te voeren: 
WSZABFeAELO; TAfZADIAAFG; MAAZA ADB; Tf2ZANff2A 


Meeft u nog vragen? Tel O10 —- 182253, 


FORTH 4% FORTH # FORTR 8 FORTH 8 FORTH 8 FORTH & FORTH 8 FORTH 
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10. DUBBELE PRECISIE REKENEN IN FORTH 


ATOM FORTH kent zowel enkele- als dubbele-precisie intesers, 
Enkele-preciste getallen zijn 16 bits getallen, 

Dubbele-precisie setallen zijn 32 bits getallen ( net zoals bij 

ATOM BABIC!), Het is hiermee moselijk om waarden tussen -2147483648 en 
+2147483647 weer te seven, Een dubbele precisie-setal neet or de stack 
evenveel plaats in 2ls twee enkele-precisie getallen, Het invoeren van 
een dubbele-srecisie getal daat oP de valdende aaniert 


44678, 
Door de ‘punt’ deven ue te kennen: dat we een dubbele-precisie setal 
bedoelen. Deze Punt mad overisens or een willekeuride plaats in het setal 
staan, Dit betekent dat we met 

44478, en 44.678 
hetzelfde setal bedoelen, 
De ‘punt’ heeft dus een heel andere betekenis dan de ‘runt’in een floatind- 
point setal in BASIC. Een voorbeeldje: 

67.861 D. seeft; 67861 


Me zien dat *D.* bij dubbele-precisie setallen hetzelfde doet als *,* bij 
enkele-precisie setallen. 


ATOM FORTH kent de valdende dubbele-rrecisie bewerkingen: 


D, Druskt het bovenste dubbele-rrecisie setal or de stack af, 

Dt Berekent de som van de bovenste twee dubbele-rrecisie setallen 
en zet het resultaat op de stack, 

DAINUS Draait het teken ven het bovenste dubbele-rrecisie setal on. 

DABS Berekent de absolute waarde van het bovenste dubbele-precisie 
setal. 

Dt- Keent het teken van het bovenste enkele-rrecisie detals en kent 


dit toe aan het dubbele-rrecisie setal daaronder. 
ATOM FORTH kent de voldende stack-operaties in dubbele-rrecisie! 


2DROP Verwijdert het bovenste dubbele-rrecisie element van de stack. 
Kerk or dat 2DROP hetzelfde doet als DROP DROP 
1e 2, 2DROP D. deeft; 1 

20ur Durliceert het bovenste dubbele-srecisie elesent. Kerk op dat 
2DUP hetzelfde doet als OVER OVER 
3e 4. 2DUP D. De DN, geeft: 443 


FORTH 8 FORTH & FORTH & FORTH £ FORTH # FORTH &£ FORTH & FORTH 
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11,ENKELE NOG NIET GENGEMDE FUNCTIES 


Ve zullen nu een aantalr nod niet behandelde functies: orsoamen.Waar niets 
vordt sespecificeerd: worden enkele-precisie getallen verondersteld. 


TOGBLE 


H/KOD 


Deze functie is eauivalent met: ROT ROT & / 

net als enia verschil, dat het tussenresultast in dubbele- 
Precisie wordt opdeslasen. 

foet hetzelfde als &/ + maar laat onder het antwoord van #/ 
ook nos de rest van de delind achter op de stack. 

Neent het teken van het bovenste element en kent dit toe aan 
het daaronder ligdende element. Het bovenste element wordt 
verwijderd, 

Durliceert het bovenste element: maar alleen als het ongelijk 
is aan nul, 

Zet een 1 or de stack als het bovenste setal groter is dan het 
tweede detal or de stack, In alle andere gevallen komt er een 0 
op de stack, Het verschil met < is dat de setallen nu als 
getallen zonder teken worden beschouwd! 

Berekent de bit-voor-bit logische exclusieve-of van het lade 
bute van het bovenste elesent op de stack, met de inhoud van 
het adress dat als tweede getal or de stack staat, Het 
resultaat wordt op dit adres terussezet, … 

Vermenisvuldiet tuee enkele-precisie setallen en zet het 
resultaat in dubbele-precisie oP de stack, 

Doet hetzelfde als Ni , maar behandelt de getallen als detallen 
zonder teken, 

Deelt het dubbele-precisie detals dat als tweede or de stack 
staat, door het enkele-srecisie getal, dat bovenop staat. Het 
resultaat wordt in enkele precisie op de stack gezet, 

Doet hetzelfre als M/ , maar zet eerst de rest van de deling 

op de stacks en vervoldens het auotient daarboven op, Beschouut 
de getallen als setallen zonder teken! 

Toet hetzelfde als U/ » naar bevaart het auotient in dubbele- 
precisie. 


Ve kennen ny al een sroot aantal FORTH-functies, Om met al deze functies 
vertrouwd te raken, kan je het heste zelf set een aantal voorbeeldjes 
oefenen, Probeer zelf de bovenstaande functies eens uit: en kijk of je 
kan voorspellen wat het resultaat zal zijnti 


SUCCES ERMEE !!! 


TOT DE VOLGENDE KEER, 


BOOTSTRAP VOOR DE ACORN ATOM 
hd 


Voor het Engelse woord bootstrap bestaat geen ede nederlandne 
vertaling (letterlijk betekend het laarzestrop), maar figuurlijk 
wordt het gebruikt in: uit eigen kracht er weer bovenop komen. 
In computer-ternen wordt een bootstrap-programma gebruikt voor 
het opstarten van bet computeraysteem, In de standaardversie 
van de Acorn Atom worden o.n. de systeem-vectoren op #200 t/a 
21B (m.u.v. NRIVEC) gezet op hun normale waarde. Zo wordt bv. 
EPTVEC (=Put byte to tape) gezet op KPCIC en op dit adres 

begint een routine díe met een snelheid van 300 band een byte 
naar de cassette-recorder stuurt. Elke keer als we op BREAK 
drukken worden deze vectoren weer teruggeset op hun ‘normale’ 
vaarde. Er bestaat echter een mogelijkheid om dit te ondervangen 
en BPTVEC bijvoorbeeld altijd naar een 1208 baud routine te 
laten wijzen. Hiervoor is nodig een 16K-kaart, een miniscuul 
printje, enige soldeer-ervaring en een klein prograama, 

Het schakelingetje werkt als volgt: op de laatste 
zes geheugen plaatsen van het computer-geheugen 

— dus van IFFPA t/m AFFPF - staan voor iedere 

6502 processor (ook die van de acorn} een aantal 
adressen. Eén daarvan in de rg. resetvector, en 
elke keer als men de BREAK-toets Índrukt en weer 
los laat leest de processor deze resetvector, en 
begint op bet adres-wat daar staat een bootstrap- 
prograama. Zonder deze schakeling is dat op #FP3P. 
Is echter deze schakeling ín gebruik, dan haalt 

de processor de data op de adressen #FFPÖ t/m UFFFF 
niet daar vandaan, maar van 7PPS t/m TPPF. Dit 
gebeurt door bit 15 van de adresbue (A15) gelijk aan nul te 
saken als A14 t/a AJ allemaal &én zijn. Bovendien werkt het 
bootstrapschakelingetje alleen als de ehift-toets niet is in- 
gedrukt. (de normale BREAK-routine wordt dus uitgevoerd als 

de shift-toets is ingedrukt op het moment dat de BREAK-toets 
wordt losgelaten. Dit ís soms handig als er een fout blijkt te 
zitten in ons eigen bootetrapprogramma). 

Opbouw van het bootstrapschakelinget je. 

Er wordt gebruik gemaakt van twee goedkope IC's, waarvan echter 
de 74LS133 moeilijk te krijgen ís. Dit ís een 13-input NAND-poort. 
Het andere IC is een T4LS11, een QUAD 3J-input AND-poort (een 
3-input is net een tikje sneller dan een 2-input). Beide 1C'# 
worden zodanig op het printje gezet dat hun pootje nr 1 zich 
het dichts bij het midden van de print bevinden. Over de plaats 
van de IC's is geen twijfek mogelijk: het ene IC heeft 14 pennen, 
het andere 16, De IC's worden zonder voetje direkt op de print 
gesoldeerd. De IC's mogen niet te heet worden, dus houd de sol- 
deerbout slechts kort tegen een IC-pen en wacht minstens 36 
tellen voor U met het volgende pennetje begint. Raast de IC's 
komen een aantal aansluitpennetjem, die gemaakt kunnen worden 
van kleine stukjes blank draad. De hoogte van de aansluitpen- 
netjes ís gelijk aan de hoogte van de IC's. Er is echter 
Eén duidelijk dwarsgeplaatste aansluiting (gemerkt met een veer 
klein sterretje of puntje) die een lengte moet hebben van Sets 
meer dan een cm. Deze aansluiting wordt naar buiten gebogen, 








Dof 


Vervolgens worden IC 6,1C 22 (de processor) en onder bank in d 
1C 23 voorzichtig uit de computer gehaald. Aan 
kant 2 van de conputer-print (de kant met de 
1C's erop) moet de adreslijn A15 worden door- 
gekrast (zie figuur). Let er hierbij op dat 
niet per ongeluk ook een andere verbinding wordt 
doorgekrast f Aan kant 1 van de computer-print 
wordt ook A15 doorgekrast (dit ís de kant van 
het toetsenbord) A15 loopt van pin 6 van IC 23 
naar een } mm verder gelegen scldeerpunt. Nu 
wordt het bootstrapschakelingetje op de com- 
puter-print gesoldeerd. Ook dit gebeurt op kant 
1 en wel zodanig dat de tekst op het printje 
zichtbaar blijft en de IC's met de aansluit- 
pinnetjes naar de computer-prínt kijken, Het 
pinnetje bij de 'P' komt rechtm-boven en 

wordt vast gemaakt aan het soldeerpunt van 
processorvoetje. Het punt 'F' komt aan de pro- 
ceszorpin 1 en het punt ‘1' aan processorpin 8, 
en alle andere soldeerpunten gaan net zo. De 
extra lange aansluitpin (die vastzit aan het dwars geplaatste 
soldeerpunt van de bootstrapschakeling) komt echter nict aan 

de processorvoet, maaar aân pin nr 6 van IC 23, Let er op dat 

alle pinnen goed kontakt maken en geen sluiting (2x controleren). 
Met een niet te lang draadje wordt het soldeerpunt 415 van de 
bootstrap-print verbonden met pin 4 van IC 6 (3x controleren). 

De IC's 6,22 en 23 kunnen nu weer terug in de computer, waarna 
vervolgens 1C', 25 wordt verwijderd, Mu wordt een kort draadje 
gelegd van pin 25 van IC 25 naar het soldeerpunt ‘shift! op 

de bootstrap-print. Ats IC 25 weer op z°n plaats is gezet 

wordt nog eenmaal gecontroleerd of alle 
verbindingen goed gemaakt zijn en of de 
IC's weer goed in hun voetje zijn ge- 
stoken. Is alles ok dan kan de computer 
weer worden aangesloten. GEBRUIK NU 
ASECHTER 'SHIFT BREAK" om de computer 

aan de praat te kríj genl!1 ven 

Tik nu het bootstrap programma — de 
volgende pagina in, gevolgd door 1 van de 4 
“(4:0E Two) voorbeelden. Hierbij moet de t6K-kaart 
niet ín WRITE-PROTECT staan, 

Als U nu BREAK în drukt moet alles goed gaan. (of U heeft een 
fout gemaakt in de schakeling en/of prograama) 


Bootstrap F2 
regel 4Orwachtloop om de pia (8255) wat tijd te geven GED 
SOrset de PIA-poorten goed. 
6OIJKP naar het adres dat staat op 4TPP4 en #TPFS, nor- 
maal JKP naar het adres van regel 710, maar voor de 
liefbebber kan dit dus vervangen worden door een 
ander machine-taal programma 
TOsreset alle systeemvectoren, cursor, pagemode, etc. 
DOrstart een basic programaa, maar haal de waarde van 
718 (de tertpage-pointer) op van het adres PIFFT 
90-11Orsoek TOP op en zet de ARRAY-pointer goed;JMP BASIC 
120-1401dit is de subroutine van regel 16 
150:4*7FA1 is adres van regel 70 voor JHP van regel 60 
168s bij BREAK wordt nu 218=47P (hier, is ruimte voor een 
BASIC-prograama van maximaal 2 volle regels) 
1701âit sijn de nieuwe ayateen-vectoren (vgl met FFFFÔ 
t/u A FPFF) 









hier verbreké 


10 REM /// BOOTSTRAP v2 /// 

15 REK WERKT ALLEEN MET BOOTSTRAP- 

20 REM SCHAKELING EN 16X-KAART 

30 P=7FBA;REM TIJDELIJK GEEN WRITE-PROTECT 

40 [;LDX @#00;LDY €#80;DEY; BNE #7FDE;DEX; BMI #7P8C 

50 LDA @#BA,STA # BOILDA €404; STA # BOOZ 

60 JP (#7PP4) 

10 JSR H7FD4 

83 LDA #TPFT;STA #O6;LDY eFOOFSTY HO5)STA U123STA HOEKSTY HOD 
90 DEY4INY;LDA (#OD),Y;CMP EHOD;ENB #7FB43JSR # CDBC 
100 LDA (BOD),T4 BNI #7FCS5;INY;BNE 4 7FBÁ 
110 INY;JSR « CDBC;LDA #OE;STA #24; LDY #OD;STY ft 234 JMP NC2EO 
120 LDX C#17;LDA 4FP9A,X;STA # 0204; Xj DEX; BPL 47PDÓ 
130 INXjSTX #EAGSTX #HEI4STX # ET; LDA €# 083 STA # 0231 
140 LDA @EOA;STA ® FEjRTSy) 
150 WIFF4at A14 2E TPFS NIF 
160 B IPFTe {IF 
110 IFFOnRFFC70206g !NTFFC-ÊPFB27F8A 


180 END 

2184 7F (voorbeeld 1) 

NEN 

1 P.86812815"ACORN ATOK."t* (het stukje P.$6812815 moet 
2 LINK #C2B2 in elk pooier gjreeraama 
218-47F (voorbeeld 2) aanwezig zijn 11! 

NEW {joebor noodzakelijk) 


1 P.86812815"ACORN ATOM“! ' 5 PCOSj IP( 14 2900AEPPPP) «1 34 218-293 OLD 
2 LINK #C2B2 


21847 yoorvenrd 3) 

NEN toolkit van prograa power noodzakelijk) 
1 P.821jLINK HAFOOzP. 86812895" ACORN ATOM, "t' 

2 LINK #C2B2 


218-468 (voorbeeld 4} 

MIFFTeH6B (vergelijk dit met regel 169 in BOOTSTRAP-programma) 
NEW 

10 M2OAHDS $ PY 2OB=HC2;$256="RUN" 

20 P,821;P2300;[JSR # FEIAFSTA HBOGRTSGJKP 3063] 

30 $265-"KOEKOEK";REM DIT IS HET WACHTWOORD VAN 7 LETTERS 
40 P,86812815JACORN ATOM" zK=0 

50 P.'"ENTER PASSWORD: — "$888$880858888 

69 T=ljF.Iet TO 73 LI. 300; IF 24 3O> 122643 T=0 

10 P."z"sN. 

80 P‚Ie1 TO 30jWAIT3N. 

90 IP T-1 GOTO 150 

100 P,''$7"ILLEGAL PASSKORD.”'4;F, I=1T099 3 WAIT;N. 

110 KeK+1j IF K=3 THEN 2 B1=0;P."GET RELP 111"3L1.306 
120 P,"PLEASE TRY AGAIN.”'4GOTO 50 

150 'zRE1-OjP. "LOGIN FROM BOOTSTRAP vV2." 

160 P.l=1 TO 2093WAITjN. ; ?4 20A=t 943 ?% 2OB-AFE 

110 P,$12"WELCOME TO TRE ATOM STSTEX,"'! 

180 IF (Ie 290O&AFFFF)>13;P "NO PROGRAM AT TEXTPAGE #29**!3 LI.#CZB2 
190 P‚"PROGRAM AP TEXTFAGE #29! ! 4218. 294 0LD 






BOE HOE 


Ik Wil EEN BOorsraapl 














FRANS 
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NEWTON- iteratie voor nulpuntbenadering 


Het benaderen van de nulpunten van een funktie kan gebeuren d.m.v. lineaire 
interpolatie. Zie Atom-manual op biz. 41, 

Een andere iteratieve methode is die van Newton (Isaäc Newton, engelse wis- en 
natuurkundige, in de 17e eeuw.) 
Hiernaast is de grafiek getekend van 
de funktie f(x) = Xx? -6x + 8 


Nulpunt: 
De naam ‘nulpunt’ wordt gebruikt 
voor het snijpunt van de grafiek 
met de X-as, maar ook voor de 
waarde van x die dit nulpunt 
aanwijst. Dus hier: 
nulpunten x=2 enx=4 
Benadering: Het nulpunt van de grafiek links is x = p, 

f, met p onbekend. Beginnen we met de : waarde 
x=a en tekenen we de raaklijn in punt A, aan 
de grafiek, dan zal deze raaklijn de x-as 
snijden, stelin x=a,. , 
De raaklijn A, snijdt de X-asin x= az, Enz. L Xn, 
Aldus verkrijgen we een rij x-waarden: 
a, A1, A2. Deze rij levert een benadering 
van de waarde van p. 








Het punt A, kunnen we aangeven met A, = (a,f (a) ). 

Voor de richtings-coëfficiënt (r.c.) van de raaklijn in A, geldt: 
rc. = f(a) waarbij f° (a) de afgeleide waarde van de funktie 
isin a. 

Tevens geldt: r.c.=tan a (a is de hellingshoek van de lijn). 


Afgeleide funktie: 

Een paar voorbeelden: Een paar speciale funkties: 

fo) =x* sf" (x= 43 f@)=sinx;f" y= cvs x 
fo) IEI GF") = 6x f(x) =cos.x;f’(x)= -sin Xx 
fel st eni FG)= tanxs;f’ (x)= 1/(cos x}? 
TOT f%) =logx ;f° X) =l/x 
f(x) = 22+ 2x)t D= f'D=e 


dan: f° (x) =4(x? + 2x)3 . ax: +2) 


Toepassing: zie bovenste figuur vorige bladzijde. 


f(x) = Xx? -6x +Benf'(x) =2x-6 
In het punt A (3%, - %) geldt voor de raaklijn: r.c.= f° (3%) = 1 
ro=l ® tana=1l>a=450 


zie links, 
Punten A (af (a)), B (a,0) en C (a, ,0) 
Voor de raaklijn geldt: 
re.=f’ @ ‚B Ì 
= AB_ f(a) 
en r.c.=tan> age BC 


Dus: 
e vof > BC ={@ 





En omdat BC =a- a, geldt: a, =a- 0 0 


Iteratie: 

De eerder genoemde rij waarden a, a,, aa ……. wordt nu als volgt 
verkregen. We nemen een verstandig gekozen startwaarde a en dan 
verkrijgen we de waarde EN d.m.v. formule (I). a) 
Vervolgens berekenen we de waarde a, door: a, = a, - EN 


Aldus hebben we de formule voor het iteratieve proces: 


a hek Ie En (I) 
Voorwaarden: 
Zoals uit de formule blijkt moeten we als noodzakelijke voorwaarde 
eisen dat f ° (a;) bestaat en f ° (ai) # O (ongelijk aan nul). 
De eerste eis houdt in dat de grafiek in de nabijheid van het 
nulpunt zich ‘netjes’ gedraagt: voldoende vloeiend en geen rare sprongen. 
De tweede eis: f' (aj) f 0 houdt in dat we tijdens het iteratieve proces NIET 
mogen belanden in een waarde aj die een horizontale raaklijn 
oplevert. De kans hierop is echter klein en mocht het voorkomen 
dan beginnen we opnieuw met een andere startwaarde. 
Eigenschap: 
De methode werkt snel, is doeltreffend (!) en levert een goede benadering van het 
nuipunt. Het is echter noodzakelijk om enig inzicht te hebben in het verloop 
van de grafiek om een verstandige keuze te maken voor de startwaarde a. 
Tevens moet opgemerkt worden dat de methode één nulpunt levert en niet 
laat zien of er meerder zijn, 


A7 


Jenstocte: 
De volgende tekeningen met aangegeven startwaarde laten zien 


dat dere methode aïleen sucwvesvol kan worden uitgevoerd ais 


we ons inzicht koppelen aan de slaafse arbeid van de computer. 


( of omgekeerd zoals u wilt.) 


startwaarde a 


als a{-l dan levert 
dat P, 


als a)l dan Levert 
dat P5 


els -1(a{1 dan 272 


als al} dan levert 
dat P 





als ap-2 dan 
levert dat P 


als a{-2 
âan 2272 





Programna-voorbeeld: 


10 RMU HEITON--ITERATIE : 

20 IN."BOEVEEL CIJFERS ACHTER KONMA"B;IP ED 7; Be7 

30 %Bul;Dal;P.l=l TO B;%BelR/10; DaDa10; Ne ; Be100; REN voor subr. 500 
40 Hal; 22 

50 FIN.' "STARTWAARDE ="{£5 

60 P,"*DRUK OP SPATLEBALK";LINK #FPPB3 

10 XXS + 10 

50 P. 812% x ru) rz) ee 

85 REM ++4++HOOFDP ROGR/ HHtttte 

90 DO Nal+1;P.$838* "NSF" 

160 #refz; HAS; Pan; GÔS. a , 

no eier /A ;REN ro anr -7 

130 %A=COSÁS-Ke/2 sRE P'(X) 

150 PIF ABS%A >1E-5;C010 180 

160 Pet“. eeeF"(E)= “5 lefA; P=D; GOS. a; FP. $B3B" * 

110 P‚'*ST*ERROR, VERANDER STARTWAARDE*;GOTO 40 

180 Ak-A5-Ar/AA ; AAL ;REN iteratieformule 

190 AAT; P=BCOS, a; AMA; P-D;COS.a; EN printopdracht 

200 FUNTIL ABS(#T-XIJ #8 

210 p.''* 
220 A-ÁS; F=D; COS. a 
230 P. 3838" *1= 
2409 GOTO 40 


MeeKULPUNT * 








af 


3e3EEIESERDe L 


(vervolg programma-voorbeeld)}) 


490 tetdhttetaf ronden ett 
500a FIF MM <O;P. $8*"; ût -At 

510 HGO + jd 

520 PRINT M/P*.*; 

530 DO Me WAF 6: P.M/F;UNTIL F=l 
540 P.” D ";a=2 

550 RETURN 


KUN 
HOEVEEL CIJPERS ACHTER KOMMA?5 


STARTWAARDE=?1.5 

DRUK OP SPATIEBALK 

x x F(x) P(x) 
0 1,50000 0.45 - 0,68 
1 2,14039 - 0.3 — 1.61 
2 1,95201 - 0.02 — 1,35 
3 1.93393 — 0,00 — 1,32 
4 1,93315 - 0,00 = 1,32 


meeeenneneenteenssnen 
NULPUNT 1,93315 








meeezen 


Met de iteratieve groeten, 
Henk Boxma ; 9525TB Drouwenerveen 


>>> SHUT € 
= ’PRINT AT’ FUNKTIE VOOR DE ACORN ATOM 


NA EEN 'RUN’ 1S DE FUNKTIE BESCHIKBAAR 

NA 'BREAK’ FUNKTIE TERUG TE KRIJGEN MET: !#21A=82000 
VOORBEELD : SHUT 45; PRINT "HALLO" 

245’ MAG OOK EEN VARIABELE 21N 

T DE WAARDE VAN @ TOT S12 


Deen 
LEN 


160 P=#2800;[LDY224;LDA(222)V,EOR225;STA (222), V;INXGLDA#42,X 

170 ORA#33 X,BEOP+3BRK;LDA#24 XCMP@2;BCSP-5;ORA@128;STA223 
180 LDA#15 XANDO31;STA224:LDA#15, XANDO224;STA222;RTSI] 

190 W#f21A=#f2800; END 


EXTERNE LUIDSPREKER OP DE ATOM 


De spelletjes-maniakken en de componisten onder ons 
zulten zich beslist wel eens gestoord hebben aan de 
erbarmelijke geluidskwaliteit van de atome 

Hier volgt een simpele oplossing om de geluidskwaliteit 
drastisch te verbeteren,en dus ook goed hoorbaar!!! 

Het enige wat men nodig heeft is een "SN JAG" (dat ie 
een hex inverter buffer/drivers met open collector), 
een luidsprekers en een potmeter. 

Hieronder volgt het aansluit schema: 







t5Vv 


LUIDSPREKER 
Het ic is in bovenaanzicht 
getekend 


van POTMETER: #70 OHM 


16:45 Dit de atom 
In deze schakeling is een andere inverter gebruikt als 

de huidige in de atom omdat de "7416" een grotere stroom 
verdraagt.De draad die van pootje 5(ichS uit de atom)komt 
ken men het beste dir@kt op dit ie (#5) solderen zodat de 
print niet beschadigd wordt,Daarna soldeerd men alle 

draden aan het ic 7416.Wanneer dit gebeurd is kan men 

dit ic onder de aanwezige koelplaat net superlijm vastiájmene 
Op deze manier zit het niet in de weg,het zit stevig en 

er is geen aparte print nodigeNB.Dit is alleen voor het 
gemak gedaan,het IC heeft geen extra koeling nodig. 

Daarna kan men het beste de draad waaraan de luidspreker 
kont een klein stukje uit de kast voeren en aan het einde 
bev.een contra tulpstekkertje monteren.De luidspreker wordt 
dan voorzien van een stuk draad waarin men de potmeter 
opneemt,en aan het uiteinde monteer® men dan een tulpstekker. 
NB.Men verkrijgt een veel beter geluid wanneer men de 
luidspreker op een stuk spaanplaat monteert,of men moet 
gebruikmaken van een kleine luidsprekerbox. 


Hans van der lint 


JOLSTICK VOOR ACORN SNAPPER 


Voor de mensen die zich ergeren aan de toetsen-besturing van het spelletje ‘Snapper’ 
(van Acornsoft), volgt hier een nieuwe routine voor het lezen van de joystick. 

Een kompleet nieuwe routine is noodzakelijk omdat de oorspronkelijke 
keyboardscan het adres #BOOI gebruikt en omdat de oorspronkelijke routine 
bekijkt welke toets het laatst werd ingedrukt. Men kan dus in de oude routine niet 
even een paar getallen veranderen. 

Hier volgt een beschrijving van hetgene wat men moet doen: 

Men dient het programma als normaal te laden. Daarna moet men in een stuk 

vrij geheugenruimte gaan ‘zitten’. 

(N.B. het programma bezet de geheugenruimte # 2900 tot # 3B00). Wanneer men 
niet in het bezit is van de ramkaart, maar wél gestapeld laag geheugen kan men het 
programma op + 3B00 zetten. Ook kan het programma op B.V. # 8200 alleen 
dient men dan wel goed op te letten dat het programma helemaal goed is, want 
snapper overschrijft dit bij runnen. 

Men moet het volgende intoetsen: 

218 = BC (of naar een ander vrij stuk geheugen) 


NEW 

10 P = #3300 

s & 

30 LDA @ #91 NT 

40 STA + BO00 e 

50 LDA +# BOO1 Han van der Lint 

60 CMP @ + EF; BEQ + 382A Roosendaalsebaan 26 
70 CMP @ # F7; BEQ + 3820 4751 RB Oud - Gastel 
80 CMP @ +#FB; BEQ + 3825 tel: 01651 - 1553 
90 CMP @ + FD; BEQ + 383B 

91 JMP & 3867 


100 LDY @ 4 O1; JMP &# 3867 xl 
110 LDY @#02; JMP + 3867 EN 
120 LDY @ + 03, JMP 4 3867 : 

130 LDY @ + 00; JMP # 3867; RTS; ] 

140 END 

RUN 

Wanneer het programma het naar behoren doet kan men het als volgt op 


tape zetten: “SAVE ‘SNAPPER’ 2900 3B00 
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ELDERS LADEN VAN DATA 


Soms kan het nodig zijn om de data, behorend bij een bepaald programma, elders 
in het geheugen van onze Acom onder te brengen. 
Hiervoor kan meer dan één reden zijn: 


- het programma is zó groot, dat er onvoldoende plaats ís voor de opslag 
van data in het lage tekstgeheugen; 

- het programma moet kunnen draaien vanuit een EPROM- geheugen of 
vanuit een WRITE -PROTECTED-gedeelte van de 16K--RAM kaart. 


In zijn bijdrage ‘Een Binair naar Decimaal Converter’ van Hans van der Lint gebruikt 
deze voor data-opslag een byte-vector, beginnend bij f 80. Deze vector wordt 
eenvoudigweg geDIMD door te stellen: B =# 80 (en dus niet door DIM B (zoveel). 
Dit is al één mogelijkheid, die overigens maar beperkte ruimte biedt. Bovendien 
gebruikt de Toolbox het adres f 80 óók, zodat in dat geval moet worden uitge- 
weken naar bijvoorbeeld het hoge (video)-geheugen . 


In de regio Noord is dit probleem aan de orde geweest en men heeft hier nog twee 
oplossingen aangegeven, één door het manipuleren van de DIM - statements en 
één die werkt bij DATA en READ-statements, dus bij het gebruik van de Tool- 
box. 


Komen in een programma DIM statements voor, dan wordt ruimte gereserveerd 

voor deze DIM statements vanaf TOP. Bij het invoeren van het commando RUN 

wordt de DIM-pointer namelijk automatisch gelijk aan TOP gemaakt. 

Willen we nu ergens anders demensioneren, of is de ruimte in het lage tekstgeheugen 

te klein, dan kunnen we dit doen door de DIM-pointer aan het begin van het pro- 

gramma, dus vóór de eigenlijke D]M-statements, aan te passen. Deze DIM-pointer 

bevindt zich op de adressen # 23, # 24 zodat de aanpassing wordt: 
2#23=-0:T# 24= #82 

Hiermee dimensioneren we in het video - geheugen, op + 8200. 

Wanneer we gebruik willen maken van de statements DATA en READ van de 

Toolbox van Program Power, dan zal het programma in het algemeen in het lage 

geheugen staan, dus op # 2900. 

In het hoge tekstgeheugen kunnen dan de data geplaatst worden met willekeurige 

regelnummers, bijvoorbeeld 10, 20, 30, enz. 

In het lage geheugen moet dan als volgt gewerkt worden om het READ-statement 

naar de juiste geheugenplaats te sturen: 


# 2900: 





# 82, RESTORE; 718 =# 29 


80 READ $ A 
90 





END 


De DATA-pointer van de Toolbox bevindt zich op het adres # AC, #AD zodat 
inplaats van regel 20 simpelweg kan worden getypt: 


20!f AC =f 8200 


+ VLS aan AUTEURS 


Bedenk, dat de lezer in het algemeen geen expert is (u wel!) 
Laak dus geen te grote cedachtenstappen en begin uw verhaal op 
het kennisnive van de groep lezers waarvoor uw verhaal bedoeld 
is, Dat kan de club van 16K-RAl-kaarthouders zijn, maar dat 
hoeft niet} 


Deel uw verhaal in in "hapklare brokken", dus maak slechts één 


(betoog-)stap per alinea. 


Bij lange verhalen js het aan te bevelen om mijlpalen als 
hoofdstuk-titel te nemen. 


Spelling. Persoonlijk ben ik geen voorstander van fonetische 
spelling, zoals sommige bladen die propageren. Van de andere 
kant wil ik niemand verplichten om "frekwentie" steeds met 

“qu”" te schrijven, ìaar "sirkwie" voor "circuit” gaat naar mijn 
smaak wat ver. 

Lay-out, Onze drukker hanteert een bladspiegel van 250x170 mn. 
Ga hier dus niet buiten; het is verloren moeite. 

Deze tekst heeft een dubbele tussenregelruimte, de bijdrage 
“Graphics met de Acorn Atom" van Frank heeft een enkele. 

In het laatste geval kan er dus meer tekst op één bladzijde, 


Hopelijk is het tevens goed leesbaar, 


Programma-LISTings. Deze moeten duidelijk Leesbaar zijn en mogen 
geen type-fouten bevatten want dan werkt 't niet. Lange LIST- 
ings kunnen, geloof ik, beter via het bandjesarchief verspreid 
worden, Zorg verder voor voldoende kommentaar en zo mogelijk 
een duidelijke indeling in hoofdprogramiua en hulpprogramma's 
c.q. subroutines, 


Vergeet u ook niet de vereiste hardware=omgeving te vermelden! 


Caarne uw veaktiet Ton Otten. 


“ DIRECT-PAGE * REGISTER VOOR DE 650 
nnn 
Dit is een schakeling voor 6502 freaks. 


De 6502 is een veelgebruikte microprocessor. Hij is bijvoorbeeld te 
vinden in de Appie, de Acorn. de Dragon en de PET computer. 

Iemand die weleens de 6502 \n assemblertaal geprogrammeerd heeft weet 
dat de 6502 verschillende manieren van adresseren heeft. Bij deze 
adresseringen wordt vaak de zyn "“ZERO-PAGE“" gebruikt. (Voor meer 
informatie hierover verwtis :k naar de assembler cursus). Met behulp 
van de hier beschreven schakeling ts de ZERU-PAGE uit te breiden over 
het hele geheugen. Een zelfde truc zou ook gebruikt kunnen worden om 
de stack ruimte uit te breiden. 

Het de geheugenplaatsen in de JERO-PAGE kunt U bijzondere dingen 
doen, jammergenoeg zijn er maar 256 van dergelijke geheugenplaatsen. 
Vaak moet U cok nog bijhouden welke al gebruikt zijn en welke nog vrij 
zijn. Met deze schakeling is dat probleem (nt de wereld. Elk programma 
kan nu zijn eigen ZERO PAGE gebruiken. 


De schakeling bestaat wit een & tal 1.C.'s die aan. de bestaande 
computer toegevoegd moeten worden. Eigeniijk wordt er buten de 
processor nog een extra register bijgemaakt. Dit extra register noemen 
me het Direct Page Register (=DPR). 

In de schakeling bestaat het DPR uit een I.C. met nummer 7ALS273 teen 
zgn. B-bits latch). 

In het DPR kunt U alleen maar een getal wegschrijven, maar geen getal 
lezen. Daarom 15 het mogelijk om dit OPR hetzelfde adres als de ROM’s 
te geven, want deze kunt U alleen maar lezen. 

Hoe werkt het nu met de DPR 2 

Indien een adres in de ZERO PAGE geadresseerd wordt, dan zijn de 
hoogste B adreslijnen ’Q’ en worden zij vervangen door de inhoud van 
de DPR. De inhoud van de DPR bepaalt dus welke page aìs ZERO 

PAGE gebruikt wordt. 

Dit omschakelen gebeurt door 2 1.C.”s van het type 7405244, dit zijn 
zon S-state bufters. 35 andere 1.C.’s (74LS02, 74LS04 en  74LS20) 
detecteren wanneer de 6 hoogste adreslijnen ”0’ worden. Is dit het 
geval dan wordt L.C. 1 uitgeschakeld en 1.C. 5 ingeschakeld zodat de 
inhoud van de DPR op de 8 hoogste adresiijnen verschijnt. 

Het selecteren van de DPR gebeurt door het restant van de gebruikte 
1.C.’s, De volgende stuursignalen zijn hierbij nodig: R/W, 02 en CS 
‘van de ROM’ s). 

Ook is er een voorziening aangebracht om bij het aanzetten de DPR nul 
te maken. Bij het aanzetten start U dus met een schone lei. 

Tenslotte reen voorbeeldje om aan te geven hoe U er mee moet werken: 
Bv. U schrijft een programma en wilt de adressen 2000 t/m 20FF als 
"ZERO'PAGE gebruiken. U moet dan het volgende doen: 

LDA “s20 Hoogste adresbyte 
STA DPR Schrijf het in DPR 
Vanaf hier vinden alle ’'ZERO'PAGE operaties in page 20 plaats. 
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RES Daten O0 07 


Adressen A6-A1S 


ps 
Le 


18 REM 4 OP EEN RIJ!! EEN SPELLETJE VOOR DE RCORN ATOM, 

2 REM PROGRAMMA VEN GERARD AKKERMANS, 

38 DATA 12,-1,-14,-13,-12, 1,14 

48 DIM SS 42), BLT), IK 156 9, RRLI) 

BB RRC L 3 RRCD Je 13; RRC JJ 19D) RRCA Del RCS Jel 1; RRC 604 

69 RRC 2199; RR B 2044; RCI 23; RLG 222 

70 REM SPEELWIJZE EN SPEELSTERKTE 15 TE VARIEREN DCOR VARIATIE 
88 REM VAN DE COEFFICIENTEN RRC1:9) 

98 REN IHA: R7 >= RI > RE vw R6 > RI RA > REZ) RI DRL) RI 
09 REM RRC1:3) 15 BELONING VOOR RANSLUITING OP 1:3 VAN COMPUTER 


ld 


1@ REM RRC4:6) IS BELONING VOOR AANSLUITING OP 1:3 VAN SPELER 
120 REM RRC7)-WINST; RRLBI-GEEN VERLIES; RRC 9)-GEEN VOORZET 
130 REM RRCO-GEEN VOORZET URRRDOOR SPELER DE WINST BLOKKEERT 
148 FOR Na43 TO 1565 UUKNDS@;NEKT N 

159 We@; Ie6;Ba2;DeA;ON ERR GOTO u 

168 FOR Net TO 42;S5CN Jed; UUCND=BINEXT N 

179 7920512: 7020R0= 1d; a 2BAB: TINQD; (HLB L=#2225255 

189 182855=#77777700; HI2ESTuPd 1442272; 'MAGALEN44EELEL 

199 I42BRTENIT77444A; | H2ORILDSISSTT7 ;  W2BAD-H66EG 

200 P‚812,"4 OP EEN RIJ"*’’"UILT U BEGINNEN??7"/ 


228 IF Red GOTO u 
230 HeABSLRNO%4 142; Imp; De; SSH De) 
2485 GOSUB Pp 
259 P_439,"NIJN ZET"I" *;I=9 
D>6 THEN Bal;GOSUB w 
Wei THEN P„ "IK HEB GEMONMEN!!";PLAY ES,E8,E8,E8; END 
D>41 THEN TXMOD;P. "GEEN WINNAAR" ; END 
STRST ZET VAN DE TEGENSPELER, 
1459 THEN P‚833,* hl 
; INDUT"HELKE RIJK 
<1 RT THEN PLAY A8,88,C8,D8:G0TA u 
5 


Nn 

38 

[] 
ET 
nnn 


z8n8 
33ind 


EE 


ak 

Heg THEN SSCHe-L: iel; NSS 

N 

THEN PLAY AB,B3,C8:D8: GITO u 

1:GOSUB > 

THEN B=-{;GOSUB w 

THEN P‚"JE HEBT GEUORNEN! 1": PLAY A4, Ad, A4, A4, A4: END 
HEN THMOD;P. “GEEN WINNAAR"? ; END 

ZET VAN DE COMPUTER. 

SS dI=R THEN SSA 4 pel ; Had Td; Dat: GOTO bo 
;COSUB 1 

FOR Mel TO 7 

450 IF BANDIS THEN S=BECN); T=M 

478 NEXT N 

489 FOR NeB TO 5 

499 HelE7+L 

50G IF SSCHIeG THEN SSCHDel:NeS 

SI@ NEXT N 

se D=b+1;GDTO hb 

520 REM EINDE VAN HET HOOFD-PROGRAMMA. 


sp 


1 


5 


hk 
g25s 
CE 


k 


$ 


_ 
n 


@ 
82 


EO5EREEIBIERE 
} 
3 


a 
5 


54R REM PLOTROUTSNE VOOR HET BORD 

558s SR 

568 P,’" 2348 6 7 "810, "4",$19,88, 810, "0" 
570 P‚s1Q leo,ve me, $0,810,"E", 810,88, "E",$!9, 88, "N" ‚410,48 
582 P‚$10,"R",410,$8,"1".$12,88,"J",$30 

594 MOVE 1,1;DRAU 1,168;MOVE 1,1;DRAU 196,1 
609 FOR Nai TÔ 7 
619 He2SKN;MOVE H‚1;DRA H‚168:MOVE 1,H;DRAW 196, H 
629 NEXT N 

632 RETURH 
640 REM PLOTROUTINE VOOR DE FICHES 

650p Mul H-l 24741 sel Hel 2/41 

668 MOVE (MK2B-14D,CLK2B-14) 

670 IF S$(Hjel THEN SHAPEN2658 

680 IF SSCH)e-1 THEN SHAPEE2609 

698 RETURN 

200 REM ZETTEN GENERATOR 

71Gl FOR Nel TO 7 

728 Zed 
FOR Mag TO S 

HaMK7 eN 

IF SSCHj=@ THEN Zuil; Me5 

NEXT M 

IF Ze THEN BEHIm-999; GATA £ 

GOSUB n 

B Ney 

NEXT N 

812 RETIJRN 

820 REM SUBROUTINE VOOR BEOORDELING VAN DE ZET, 
82An GOSUB a 

848 Zal Zei 1764242 

859 Vad; ReA; RESTORE 39 

869 FOR at TO 7 

879 READ A;CaZaf 

899 IF UKCjsd GOTO e 

899 IF WKC GOTO d 

909 Clr; VaVeRRCLD 

Bi0 IF KCHL GATA e 

920 iF Gel GOTO o 

93 IF L{>4 AND CC-P-R-ILJSA THEN VaV-PRC2I: Del 
40 IF LC>4 AUD CC-R-A-IE)A1FEA THEN WeV-RR( 2D; Gel 
Ro CeC+f; VEVERR( 2) 

36 IF UACJet THEN VeveRR ED 

979 GOTO e 

IBB Calf: VeaRRCAD; IF KCH: GOTO e 

990 IF He! THEN GQTO * 
LAAR IF LO>4 AND (Cef-R-30413-0 THEN Vev-RA( Ts Qel 
RIA IF 144 AND CL-A-R-IEN LID THEN Va -RRL SI Det 
LA2M CeC4A:VeVARRCEN IF UULCDE-L THEN VaVeRRLE) 
(A20 HEKT L 
(B&R RESTORE 20 


EEFEEREE: 





1108 IE KES GOT e 


87 


106 GOTO1 
1120h P=P+1;C=C+A 
1130 IF UU (C) =—1 GOTO h 
1140e C=Z — A;1F UU (C) =P GOTO m 
1150 IF UU (C)=—1 GOTO j 
1160k T=T + 1;C=C-A 
1170 1F UU(C) ©) 1 GOTO m 
1180 GOTOk 
190 P=P+1;C=C-A 
1200 IF UU (C)= —1 GOTOj 
1210mIF T 92 THEN V=V +RR(7) 
1220 IF P)2 THEN V=V + RR (8) 
1230 NEXT L 
1240 Z=Z +13; RESTORE 30 
1250 FORL=1TO3 
1260 T=@;READA;C=Z +A 
1276 IF VUC) (9 —1 GOTO x 
1280 C=C+A;T=T + 1; IF UU (C){) —1 GOTO x 
1290 C=C+A;T=T +1; IF UU(C)=—1 THEN T=T +! 
1300x C = ZA 
1310 IF UU(C) © — 1 GOTOg 
1320 C=C-—A;T=T + 1;1F UU(C) 0 —1 GOTOg 
1330 C= C-A;T=T +1; IF UU(C)= 1 THENT =T +1 
1340g IF T)2 THEN V = V-RR (9) 
1350 T=9;C= Z+A 
1360 IF UU(C)O 1 GOTO a 
1310 C=C+A;T=T +1; IF UU(C) O1 GOTO a 
1380 C=C+A;T=T +1; IF UU(C)=1 THENT=T +1 
1390q C= Z — A; IF UU (C) 0 1 GOTO r 
1400 C=C —A;T=1;IFUU(C)O 1 GOTOr 
1410 C=C-A;T=T +1; IF UU(C)= 1 THENT=T +1 
1420r IF T)2 THEN V=V — RR (@) 
1430 NEXT L 
1440 RETURN 
1450a FORM =1 TO 42 
1460 C=((M-1)/ 7 *6+ 42 + M; UU (C)=SS (M) 
1470 NEXT M 
1480 RETURN 
1490 REM BEPAAL OF ER EEN GEWONNEN STAND IS ONTSTAAN. 
1500w GO SUB a 
1510 FORM =1 TO 42 
1520 Z= ((M-1)/ 7) *6 + 42 +M; RESTORE 30 
1530 IF UU(Z) B GOTO y 
1540 FORL=1TO4 
1550 READ A:C =Z + A; IF UU (C) O B GOTO v 
1560 C=C + A;IF UU(C) > BGOTO v 
1570 C=C +P; IF UU (C) B GOTO v 
1580 We 1; GOTO z 
1590v NEXT L 
1600y NEXT M 
16102 RETURN 
1620 REM EINDE VAN DE SUBROUTINES 





hid 


30 OF 1280 BAUD 
NORMALE OF VERKORTE BLOKKEN … 
VERKORTE BLOKKEN ZYN OOK NORMAAL 
TERUG TE LEZEN 
TUEE GEHEUGENPLAATSEN IN ZERO PRGE (REGEL 200) 
WILT U ANDERE GEHEUGENPLAATSEN HVZIG REGEL 200 
Ta#RE SLECHTS TYDELYK NODIG 
168 He4AB HIERIN KOMT U KEUS 
1200 MPM, HN? ‚LLS, SSI 
160P,812"CDDE 13 416 BYTES LANG" 
19OIN. * "IN WELKE RUIMTE CODE OPSLAAN"! "{ BYV996 > 
20OTaAF; HAA; P2Ô;P, 42 
219, 1297023; MMImD;N, 
229r, le1TO2;PeD 
23 
249 \ ZETTEN VEKTORS 
258 LDRANNGL256 ; STRI21 
269 LDRAMMAL256; STAH2I6 
270LDAELLOK256 ; STAM2OC 
29 DARSEILLSG ; STAILOE 
299 DAANND/ 256 ; STRR215; STRO217 : STAN2OD) STRI2OEF 
2OALDRRG, STA HiRTS 
318 \ SAVE BYTE 
329: MNQ STK HEC; JSRLLS: LDXH: CPXR2 ; BCSHMI; JMPAFCTE 
30:MM3 STYACI; PHP; SEI ; PHA; JSRAFC2I 
340 STANI; JSRAFCDA: LOARAA; STAMT s CLC 
350 :MM4 BCC MMI 
368 LDX27; STKNBOED ;LOKLI 
370 JSRIFCDA:BMI MM2 
300: MNI LORE4 
398 STRMOGL; JSRMECDS; INCHBOR2 JSRHFCDS 
409: MM2 SEC; RORMCO, DECHCI ; BNE MM4 
4LOMPFLEG 
<20 « LORD BYTE 
430: NNB STKIEC s LOKK; CPNA2s BESNN? ; JSROFDFO: JSRLLS, RTS: 
440: NN7 STY6CJ; PHP; SEL 
458:NN1 LDAAN7E ; STRACH 
46O:NNE JSRHFCOO; BCC NN; INCHCA: BPL. NN2 
429: NN6 LOARIL4, STAACALDXEO:LOYHBOD2 
490: NHS JSRAFCCD:BEA NN3 
490 1NN3 BEG NN INK 
SO: HN4 DECHC4SBNE HNS/ CPXEI 


319 RORMCHIBCC NN6 

520 LOAMCAI SR LLS: MPAFCIE 

530 \ OP SCHERM ZETTEN 

540:LLS LOKT, PHA: CLC: ROCRI2; EORIIG 

550 ST/ ‚Xs INCT ; PLAS RTS 

568 \ Ll FILE 

SPO:LLO PHPI SEL: JIRMFBAF ; PHP ; JSRMFCIE; PLP: BEQLLL 


610JSRAFIF 2 

620: LLILDAE7 Is JSRIFFF 41 LOAN7S; JERMFFF 1 JERMFFED ; PLP; RTS 
€39: LL2 PHP; JMPEFI2F ; 

648 \ SAVE FILE 

650:5S4 PHP SEI ; JSRAFBAF PHP; LDARG) JSRIFC4G 

710:S32 PHP; JMPHFROG 

720:881 LDAH;RORA; BCS P+5; MPIEAFD 

PILDHE4) LDRALE , X1 STRID2, Xs DEX) BNEP =S 

740STX8DE; STHROL ; LDRMOS) DNEP +4; DECHOG) DECHOSs CLC 
TSORORED2; SEC s LONRAFF ; LDAADS ; SBCHOIs STAMCF ; LORDOG s SBCRDA 
760PHP; RORBD2) PLP; BCCP+8/ CLC ; BEQP #5; STHACF ; SEC; RORKO2 
778INX; JSR LL4; INCHOOs IMCAD4, INCOCT s ROL OO2, BCSP-P29 
760JSRHFB7O; PLP; RTS 

799\ ZENDEN EEN BLOK 

BEB: LL4 LDXEGE; JSRUFBEI STKRDC ; LOVE; LORD ZA; JSREFFDL ; DEY 
BL9ANE P-H6; LOM HCI), Y; JSRAFEDL 1 INV; CNPELI; BNEP-G; LOYRO 
B2OLDAUCA, Ys JSRBFFDL ; DEY, BNEP-7 ; LONG) JSRAFBEI; BITRO2, BVCP+1I 


B3ADEY; INYs LDACADID, Yi JSROFFD 1: CPYACF ; BNEP-B; LORIDC ; JEROFFDL 
B4ARTS; JN, sP, 86812 


87P, ’ “OPSTARTEN MET LINKS"LD 

BAP. ' "MAAK DAARNA UW KEUS" 
B30P.'"TO"&H"=} -)> ME BAUD NORMAAL BLOK” 
909P,'"IH"LH" el -)> 00 BRUD VERKORT BLOK" 
910P.'"TR"&H"=2 -) 1209 BRD NORMAAL BLOK" 
hd => 1290 BRD VERKORT BLOK" 
90E. 
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LISSE 25 JAN’ B3 


DE ACORN EPROM PROGRAMMER. 


(SCHEMA ZIE ACORN NIEUWS NR.7), 


DE PRINT IS ENKELZIJDIG MET EEN SOLDEERMASKER EN EEN 
KOMPONENTENSCREEN. 

DE PROGRRMMER 15 TEVENS VOORZIEN VAN DE 25 VOLT SPANNING DIE 
VEREIST 18. 

DEZE 23 V SPANNING IS OPGEBOUWD ROND EEN OSCILLATOR MET EEN 
NE 555 CTIMER IC). DE OSCILLATOR ZORGT ER VOOR DAT DE 
TRANSISTOR TS2 MET DE SPOEL Li EEN HOGE SPANNING KAN 
OPBOUWEN OVER C5 RAN DE INGANG VAN DE _BPANNINGSREGELAAR 
78L24. D4 IS EEN ZENERDIODE DIE DE INGANGSSPANNING VOOR DE 
78L24 BEGRENST. 

D2 EN D3 TILLEN DE SPANNING C24V) OP MET RUIM 1 VOLT ZODAT 
WE 25 VOLT KRIJGEN OP DE UITGANG, 


Fn 18 





ok ; ” 


EH HE men 





24-00 PM 
1018 4 


DE PROGRAMMER KAN ZOWEL 2716 ALS 2532 PROGRAMMEREN. VOOR DIT 
DOEL IS DE JUMPER RANGEBRRCHT (2K OF 4K). SOFTWARE IS NIET 
AANGEPAST , 

DE PROGRAMMER HEEFT EEN 64-POLIGE CONNECTOR (RECHT OF 
HAAKS), DIE VERBONDEN WORDT AAN DE BUITENSTE BUSCONNECTOR 
CPL6) VAN DE ACORN VIA 64-POLIG LINT. 

ALS DE BEHOEFTE ER IS KAN DE LAY-OUT EENVOUDIG NAAR 
EUROKAART FORMAAT GEBRACHT WORDEN, 


LET OP: C? MAG NIET TEVEEL TEMPERATUUR-RFHANKELIJK ZIJN! 
INDIEN DE SPANNING OVER D4 TIJDENS HET PROGRAMMEREN INZRKT 
DAN C7 IETS RAANPRSSEN. 


NB:PROTOTYPE WERKT UITSTEKEND! 


PIET VAN DIEMEN 


STAKLIJST EPROM PROGRHMEN . 


1.C.’S: 

IC1,IC4 74LS374 
WEERSTANDEN : ice EPROM 2332/2716 
RL 478 OHM Is 7824 TO-220 
RZ,RI,RG 4,7K OHM Is NE 555 
RS 22 omm IC-VOET 24-PINS 
RS 2.?K OHM 
R? 188 OHM TRANS ISTORS : 
RS 13K OHM 151 BC187 

T82 BO139 
CONDENSATOREN : 
ci,c 4,?uF 35V TANTRAL 
C2,C3,C6 109nF SPOEL : 
C4,C5 16uf 62V DIAMETER DRAAD 0,25 
ord In3 5% 1235 WINDINGEN 
Ce __ FERRIETSTRAF LENGTE 48 MM 
Cte tonf DIRMETER SMM 
DIODEN: 
01,03 IN4854 
D2,03 IN4148 
Da 33 VOLT ZENERDIODE SCHAKELAAR 81 
LED 1 54-POLIGE CONNECTOR 
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